Metrics for Distance on a great circle

analyze1.4s (2.9%)

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
0%	0%	99.8%	0.2%	0%	0%	0%	11
0%	0%	99.8%	0.2%	0%	0%	0%	12

Compiler

Compiled 71 to 27 computations (62% saved)

Precisions

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

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

ival-sub: 152.0ms (15.9% of total)

ival-cos: 137.0ms (14.3% of total)

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

ival-pow: 92.0ms (9.6% of total)

ival-div: 87.0ms (9.1% of total)

ival-sqrt: 66.0ms (6.9% of total)

ival-atan2: 30.0ms (3.1% of total)

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

const: 6.0ms (0.6% of total)

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

sample7.3s (14.5%)

Results

6.3s	7492×	1	valid
166.0ms	764×	0	valid

Precisions

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

ival-sin: 1.4s (24.7% of total)

ival-cos: 1.2s (21.7% of total)

ival-mult: 878.0ms (15.6% of total)

ival-sqrt: 540.0ms (9.6% of total)

ival-sub: 357.0ms (6.4% of total)

ival-pow: 314.0ms (5.6% of total)

ival-div: 308.0ms (5.5% of total)

ival-atan2: 274.0ms (4.9% of total)

backward-pass: 237.0ms (4.2% of total)

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

const: 25.0ms (0.4% of total)

Bogosity

preprocess238.0ms (0.5%)

Algorithm

2×	egg-herbie

Rules

2156×	`sum4-define`
2132×	`sum3-define`
1640×	`fnmadd-define`
1464×	`fnmadd-define`
1344×	`fma-define`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	234	1374
1	546	1315
2	1423	1315
3	4236	1303
0	26	65
1	55	63
2	117	63
3	290	63
4	704	63
5	1433	63
6	3421	63
7	5443	63
8	6960	63
0	8086	63

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

Call 2

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

Outputs
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(* (neg R) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R -2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- (neg lambda1) lambda2) 2))) (sin (/ (- (neg lambda1) lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- (neg lambda1) lambda2) 2))) (sin (/ (- (neg lambda1) lambda2) 2)))))))))
(* 2 (* R (atan2 (sqrt (fma (cos phi1) (* (sin (/ (+ lambda1 lambda2) -2)) (* (cos phi2) (sin (/ (+ lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (- 1 (fma (cos phi1) (* (sin (/ (+ lambda1 lambda2) -2)) (* (cos phi2) (sin (/ (+ lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))))))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 (neg lambda2)) 2))) (sin (/ (- lambda1 (neg lambda2)) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 (neg lambda2)) 2))) (sin (/ (- lambda1 (neg lambda2)) 2)))))))))
(* (atan2 (sqrt (fma (sin (/ (+ lambda1 lambda2) 2)) (* (cos phi1) (* (cos phi2) (sin (/ (+ lambda1 lambda2) 2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (+ lambda1 lambda2) 2)) (sin (/ (+ lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- (neg phi1) phi2) 2)) 2) (* (* (* (cos (neg phi1)) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- (neg phi1) phi2) 2)) 2) (* (* (* (cos (neg phi1)) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) -2)) 2))) (sqrt (+ 1 (fnmsub (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) -2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 (neg phi2)) 2)) 2) (* (* (* (cos phi1) (cos (neg phi2))) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 (neg phi2)) 2)) 2) (* (* (* (cos phi1) (cos (neg phi2))) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* 2 (* R (atan2 (sqrt (fma (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) -2)) 2)))))))
(neg (* (neg R) (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))))
(* (atan2 (sqrt (fma (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(neg (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- (neg lambda1) lambda2) 2))) (sin (/ (- (neg lambda1) lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- (neg lambda1) lambda2) 2))) (sin (/ (- (neg lambda1) lambda2) 2))))))))))
(* (atan2 (sqrt (fma (cos phi1) (* (sin (/ (+ lambda1 lambda2) -2)) (* (cos phi2) (sin (/ (+ lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (- 1 (fma (cos phi1) (* (sin (/ (+ lambda1 lambda2) -2)) (* (cos phi2) (sin (/ (+ lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R -2))
(neg (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 (neg lambda2)) 2))) (sin (/ (- lambda1 (neg lambda2)) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 (neg lambda2)) 2))) (sin (/ (- lambda1 (neg lambda2)) 2))))))))))
(* (atan2 (sqrt (fma (sin (/ (+ lambda1 lambda2) 2)) (* (cos phi1) (* (cos phi2) (sin (/ (+ lambda1 lambda2) 2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (+ lambda1 lambda2) 2)) (sin (/ (+ lambda1 lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R -2))
(neg (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- (neg phi1) phi2) 2)) 2) (* (* (* (cos (neg phi1)) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- (neg phi1) phi2) 2)) 2) (* (* (* (cos (neg phi1)) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))))
(* (atan2 (sqrt (fma (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) -2)) 2))) (sqrt (+ 1 (fnmsub (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) -2)) 2))))) (* R -2))
(neg (* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 (neg phi2)) 2)) 2) (* (* (* (cos phi1) (cos (neg phi2))) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 (neg phi2)) 2)) 2) (* (* (* (cos phi1) (cos (neg phi2))) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))))))))
(* R (* (atan2 (sqrt (fma (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (+ phi1 phi2) -2)) 2))))) -2))
(* lambda1 (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- R lambda2) 2))) (sin (/ (- R lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- R lambda2) 2))) (sin (/ (- R lambda2) 2)))))))))
(* (atan2 (sqrt (fma (* (cos phi1) (cos phi2)) (* (sin (/ (- R lambda2) 2)) (sin (/ (- R lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- R lambda2) 2)) (sin (/ (- R lambda2) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* 2 lambda1))
(* lambda2 (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 R) 2))) (sin (/ (- lambda1 R) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 R) 2))) (sin (/ (- lambda1 R) 2)))))))))
(* (atan2 (sqrt (fma (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 R) 2)) (sin (/ (- lambda1 R) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 R) 2)) (sin (/ (- lambda1 R) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* 2 lambda2))
(* phi1 (* 2 (atan2 (sqrt (+ (pow (sin (/ (- R phi2) 2)) 2) (* (* (* (cos R) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- R phi2) 2)) 2) (* (* (* (cos R) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (cos phi2) (* (sin (/ (- lambda1 lambda2) 2)) (* (sin (/ (- lambda1 lambda2) 2)) (cos R))) (pow (sin (/ (- R phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (sin (/ (- lambda1 lambda2) 2)) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (cos R))) (pow (sin (/ (- R phi2) 2)) 2))))) (* 2 phi1))
(* phi2 (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 R) 2)) 2) (* (* (* (cos phi1) (cos R)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 R) 2)) 2) (* (* (* (cos phi1) (cos R)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (sin (/ (- lambda1 lambda2) 2)) (cos R))) (pow (sin (/ (- phi1 R) 2)) 2))) (sqrt (+ 1 (fnmsub (sin (/ (- lambda1 lambda2) 2)) (* (cos R) (* (cos phi1) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (- phi1 R) 2)) 2))))) (* 2 phi2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda2 lambda1) 2))) (sin (/ (- lambda2 lambda1) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda2 lambda1) 2))) (sin (/ (- lambda2 lambda1) 2)))))))))
(* (atan2 (sqrt (fma (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda2 lambda1) 2)) (sin (/ (- lambda2 lambda1) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda2 lambda1) 2)) (sin (/ (- lambda2 lambda1) 2))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- lambda1 phi2) 2)) 2) (* (* (* (cos lambda1) (cos phi2)) (sin (/ (- phi1 lambda2) 2))) (sin (/ (- phi1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- lambda1 phi2) 2)) 2) (* (* (* (cos lambda1) (cos phi2)) (sin (/ (- phi1 lambda2) 2))) (sin (/ (- phi1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (* (cos phi2) (cos lambda1)) (pow (sin (/ (- phi1 lambda2) 2)) 2) (pow (sin (/ (- lambda1 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi2) (cos lambda1)) (pow (sin (/ (- phi1 lambda2) 2)) 2) (pow (sin (/ (- lambda1 phi2) 2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 lambda1) 2)) 2) (* (* (* (cos phi1) (cos lambda1)) (sin (/ (- phi2 lambda2) 2))) (sin (/ (- phi2 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 lambda1) 2)) 2) (* (* (* (cos phi1) (cos lambda1)) (sin (/ (- phi2 lambda2) 2))) (sin (/ (- phi2 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (sin (/ (- phi2 lambda2) 2)) (* (* (cos phi1) (cos lambda1)) (sin (/ (- phi2 lambda2) 2))) (pow (sin (/ (- phi1 lambda1) 2)) 2))) (sqrt (+ 1 (fnmsub (sin (/ (- phi2 lambda2) 2)) (* (* (cos phi1) (cos lambda1)) (sin (/ (- phi2 lambda2) 2))) (pow (sin (/ (- phi1 lambda1) 2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- lambda2 phi2) 2)) 2) (* (* (* (cos lambda2) (cos phi2)) (sin (/ (- lambda1 phi1) 2))) (sin (/ (- lambda1 phi1) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- lambda2 phi2) 2)) 2) (* (* (* (cos lambda2) (cos phi2)) (sin (/ (- lambda1 phi1) 2))) (sin (/ (- lambda1 phi1) 2)))))))))
(* (atan2 (sqrt (fma (cos phi2) (* (* (cos lambda2) (sin (/ (- lambda1 phi1) 2))) (sin (/ (- lambda1 phi1) 2))) (pow (sin (/ (- lambda2 phi2) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi2) (cos lambda2)) (* (sin (/ (- lambda1 phi1) 2)) (sin (/ (- lambda1 phi1) 2))) (pow (sin (/ (- lambda2 phi2) 2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 lambda2) 2)) 2) (* (* (* (cos phi1) (cos lambda2)) (sin (/ (- lambda1 phi2) 2))) (sin (/ (- lambda1 phi2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 lambda2) 2)) 2) (* (* (* (cos phi1) (cos lambda2)) (sin (/ (- lambda1 phi2) 2))) (sin (/ (- lambda1 phi2) 2)))))))))
(* (atan2 (sqrt (fma (pow (sin (/ (- lambda1 phi2) 2)) 2) (* (cos phi1) (cos lambda2)) (pow (sin (/ (- phi1 lambda2) 2)) 2))) (sqrt (+ 1 (fnmsub (pow (sin (/ (- lambda1 phi2) 2)) 2) (* (cos phi1) (cos lambda2)) (pow (sin (/ (- phi1 lambda2) 2)) 2))))) (* R 2))
(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi2 phi1) 2)) 2) (* (* (* (cos phi2) (cos phi1)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi2 phi1) 2)) 2) (* (* (* (cos phi2) (cos phi1)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
(* (atan2 (sqrt (fma (cos phi1) (* (sin (/ (- lambda1 lambda2) 2)) (* (cos phi2) (sin (/ (- lambda1 lambda2) 2)))) (pow (sin (/ (- phi2 phi1) 2)) 2))) (sqrt (+ 1 (fnmsub (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))) (pow (sin (/ (- phi2 phi1) 2)) 2))))) (* R 2))

Symmetry

(negabs R)

explain628.0ms (1.2%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
75	112	(1.1461600869836542e-193 -1.5111470388904319e-15 1.7331598676871056e+42 -4.126235521924453e-133 1.2435179996693645e-212)	0	-	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
63	119	(2.0716185391115516e+77 1.6045197208319936e-193 -2.1534911871359797e+90 -4.6303561639746824e+101 -3.0602052353890595e-248)	0	-	`(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))`
14	2	(8.319348386515605e+203 1.6511398572428062e-264 1.1648911321615987e+88 -1.0231885774333841e-22 1.7619128051227852e+304)	2	(2.2598036483051888e-38 1.0348446979456256e+25 -5.712989941018861e-271 -5.9707854533641714e-164 -4.0358832457759926e-147)	`(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))`
2	0	-	0	-	`(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))`
1	0	-	0	-	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`
0	0	-	0	-	`(cos.f64 phi1)`
0	0	-	0	-	`(-.f64 phi1 phi2)`
0	0	-	0	-	`(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))`
0	0	-	0	-	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))`
0	0	-	0	-	`(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))`
0	0	-	0	-	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(cos.f64 phi2)`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`R`
0	0	-	0	-	`(-.f64 lambda1 lambda2)`
0	0	-	0	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	0	-	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
0	29	(1.1213813391059313e-8 2.2250327073298532e-141 1.8241815990570766e+162 -1.2980560338355533e-157 -2.191059604067657e-88)	0	-	`(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))`
0	0	-	0	-	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
0	0	-	0	-	`phi2`
0	0	-	0	-	`#s(literal 1 binary64)`
0	0	-	0	-	`lambda2`
0	0	-	0	-	`(.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))`

Results

435.0ms	464×	1	valid
12.0ms	48×	0	valid

Compiler

Compiled 862 to 80 computations (90.7% saved)

Precisions

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

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

ival-cos: 80.0ms (26.2% of total)

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

backward-pass: 28.0ms (9.2% of total)

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

ival-sqrt: 15.0ms (4.9% of total)

ival-div: 14.0ms (4.6% of total)

ival-pow: 12.0ms (3.9% of total)

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

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

const: 2.0ms (0.7% of total)

eval1.0ms (0%)

Compiler: Compiled 70 to 32 computations (54.3% saved)

prune6.0ms (0%)

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
▶	60.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))

Status

Accuracy

Program

▶

61.0%

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

▶

60.9%

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

Compiler

Compiled 140 to 58 computations (58.6% saved)

simplify172.0ms (0.3%)

Algorithm

1×	egg-herbie

Localize:

Found 8 expressions of interest:

New	Metric	Program
✓	cost-diff	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	cost-diff	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
✓	cost-diff	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
✓	cost-diff	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
✓	cost-diff	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))

Rules

2104×	`fnmadd-define`
1992×	`sum3-define`
1376×	`sum4-define`
1290×	`fma-lowering-fma.f32`
1290×	`fma-lowering-fma.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	41	792
1	90	774
2	203	774
3	526	774
4	1167	774
5	2296	774
6	6542	774
0	8226	774

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize576.0ms (1.1%)

Localize:

Found 8 expressions of interest:

New	Metric	Score	Program
✓	accuracy	98.5%	(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
✓	accuracy	78.1%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	74.6%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
✓	accuracy	74.6%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	99.0%	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	accuracy	98.5%	(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	accuracy	78.1%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	74.6%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))

Results

422.0ms	233×	1	valid
43.0ms	23×	0	valid

Compiler

Compiled 799 to 42 computations (94.7% saved)

Precisions

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

ival-mult: 75.0ms (26.5% of total)

ival-sin: 52.0ms (18.4% of total)

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

ival-sqrt: 35.0ms (12.4% of total)

backward-pass: 24.0ms (8.5% of total)

ival-div: 19.0ms (6.7% of total)

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

ival-atan2: 12.0ms (4.2% of total)

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

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

const: 1.0ms (0.4% of total)

series170.0ms (0.3%)

Counts

13 → 576

Calls

Call 1

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

Outputs
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))>
#<alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (sin (* -1/2 lambda2))>
#<alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 lambda1))>
#<alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sin (* 1/2 lambda2))>
#<alt (+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 lambda1))>
#<alt (+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>

Calls

144 calls:

Time	Variable		Point	Expression
20.0ms	lambda2	@	inf	(- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
13.0ms	phi1	@	-inf	(sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
9.0ms	lambda1	@	-inf	(* (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
7.0ms	R	@	0	(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))
5.0ms	phi1	@	inf	(* (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))

rewrite592.0ms (1.2%)

Algorithm

1×	batch-egg-rewrite

Rules

5714×	`-lowering-.f32`
5714×	`-lowering-.f64`
3376×	`+-lowering-+.f64`
3376×	`+-lowering-+.f32`
3132×	`/-lowering-/.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	41	416
1	223	398
2	1936	388
0	11141	388

Stop Event

1×	iter limit
1×	node limit

Counts

13 → 232

Calls

Call 1

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

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

simplify641.0ms (1.3%)

Algorithm

1×	egg-herbie

Rules

7464×	`-lowering-.f32`
7464×	`-lowering-.f64`
3836×	`+-lowering-+.f64`
3836×	`+-lowering-+.f32`
1868×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	707	25470
1	2441	24860
0	8956	24860

Stop Event

1×	iter limit
1×	node limit

Counts

576 → 576

Calls

Call 1

Inputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sin (* 1/2 lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 lambda1))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (+ (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))

Outputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 1/2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 phi1 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) phi2) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 phi2 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (.f64 lambda1 (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/4 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 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 lambda1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/4 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 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/4 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 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal -1/2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 lambda2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (.f64 lambda2 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 1/2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 phi1 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) phi2) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal -1/2 binary64))) (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 phi2 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 1/6 binary64))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (.f64 lambda1 (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/4 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 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 lambda1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/4 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 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/4 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 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal -1/2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 lambda2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (.f64 lambda2 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal -1/6 binary64) phi1)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/6 binary64) phi2)))))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) lambda1))))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 lambda1 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda2 (-.f64 (.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 (cos.f64 phi1) lambda2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 (.f64 lambda2 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 1/6 binary64)))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1)))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 #s(literal -1/8 binary64) lambda2)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 #s(literal 1/48 binary64))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal -1/8 binary64)) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal -1/48 binary64))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (*.f64 #s(literal -1/8 binary64) phi2)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 #s(literal 1/48 binary64))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (.f64 phi1 (-.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (.f64 phi2 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) phi2) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 lambda1 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/6 binary64))))) (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 #s(literal 1 binary64) (-.f64 (-.f64 (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda2 (+.f64 (.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi1))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 lambda2 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 1/6 binary64))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
(sin (* 1/2 lambda2))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 #s(literal -1/2 binary64))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 #s(literal -1/8 binary64) lambda1)))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 #s(literal 1/48 binary64))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 lambda1))
(sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 lambda2 (+.f64 (.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda1 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 lambda2 #s(literal -1/48 binary64))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal -1/6 binary64) phi1))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/6 binary64) phi2))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) lambda1)) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal -1/4 binary64)) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal -1/4 binary64)) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 (.f64 lambda1 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) #s(literal -1/12 binary64)) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) #s(literal 1/12 binary64))))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi2) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))) (cos.f64 phi1))) (.f64 (cos.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/4 binary64)) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))) lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi2) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))) (cos.f64 phi1))) (.f64 lambda2 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal -1/4 binary64)) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))) (.f64 (.f64 lambda2 (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) #s(literal -1/12 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) #s(literal 1/12 binary64))))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))

eval263.0ms (0.5%)

Compiler: Compiled 80282 to 3119 computations (96.1% saved)

prune316.0ms (0.6%)

Pruning

62 alts after pruning (62 fresh and 0 done)

	Pruned	Kept	Total
New	1046	62	1108
Fresh	0	0	0
Picked	2	0	2
Done	0	0	0
Total	1048	62	1110

Accuracy

64.2%

Counts

1110 → 62

Alt Table

Click to see full alt table

Status	Accuracy	Program
	57.4%	(.f64 (atan2.f64 (pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	42.0%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	59.7%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	58.8%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	56.1%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	44.1%	(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	43.7%	(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	61.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	32.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	61.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	61.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	47.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	42.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	41.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	43.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	56.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64)))))) (*.f64 R #s(literal 2 binary64)))
▶	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
	49.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	38.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
▶	62.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	39.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	47.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	48.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	47.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	44.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 phi1) lambda1))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
▶	44.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	46.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
▶	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	41.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	43.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	47.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	60.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
	40.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))))
	47.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
▶	42.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
	48.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	48.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
	47.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
	39.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (.f64 phi1 (-.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
	43.4%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))

Compiler

Compiled 9890 to 4930 computations (50.2% saved)

simplify327.0ms (0.6%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	34240	(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64)))
✓	cost-diff	34240	(sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))
✓	cost-diff	34560	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64)))))
✓	cost-diff	34560	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
✓	cost-diff	6464	(sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
✓	cost-diff	6784	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))
✓	cost-diff	6784	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))
✓	cost-diff	6784	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
✓	cost-diff	0	(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))
✓	cost-diff	0	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
✓	cost-diff	0	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
✓	cost-diff	0	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
✓	cost-diff	384	(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))
✓	cost-diff	384	(sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))
✓	cost-diff	768	(atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
✓	cost-diff	768	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	320	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	320	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	cost-diff	320	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))
✓	cost-diff	320	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))

Rules

4252×	`-lowering-.f32`
4252×	`-lowering-.f64`
3330×	`+-lowering-+.f64`
3330×	`+-lowering-+.f32`
1156×	`sum4-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	108	2438
1	252	2295
2	686	2222
3	2070	2067
0	8281	2067

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize1.6s (3.2%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	85.0%	(+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64))
✓	accuracy	79.0%	(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
✓	accuracy	78.9%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	77.0%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
✓	accuracy	98.8%	(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
✓	accuracy	89.8%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	78.9%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	78.9%	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
✓	accuracy	89.8%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	89.8%	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
✓	accuracy	78.9%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	78.9%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
✓	accuracy	85.0%	(+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64))
✓	accuracy	85.0%	(-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))
✓	accuracy	79.0%	(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
✓	accuracy	77.0%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
✓	accuracy	98.7%	(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
✓	accuracy	89.8%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	78.9%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	78.9%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))

Results

1.0s	207×	1	valid
70.0ms	49×	0	invalid

Compiler

Compiled 2540 to 109 computations (95.7% saved)

Precisions

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

ival-cos: 177.0ms (23% of total)

ival-sin: 153.0ms (19.9% of total)

ival-mult: 138.0ms (17.9% of total)

ival-sqrt: 77.0ms (10% of total)

backward-pass: 59.0ms (7.7% of total)

ival-pow: 39.0ms (5.1% of total)

ival-div: 38.0ms (4.9% of total)

ival-sub: 34.0ms (4.4% of total)

ival-atan2: 31.0ms (4% of total)

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

const: 2.0ms (0.3% of total)

series511.0ms (1%)

Counts

31 → 1308

Calls

Call 1

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

Outputs
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))>
#<alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* 1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* (sin phi1) (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))) (* -1/12 (sin phi1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* 1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda2 (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* -1/12 (* phi1 (sin (neg phi2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/12 (* phi2 (sin phi1)))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (+ (sin (* 1/2 (- phi1 phi2))) (* 1/8 (/ (* (pow lambda2 2) (* (cos phi1) (cos phi2))) (sin (* 1/2 (- phi1 phi2))))))>
#<alt (+ (sin (* 1/2 (- phi1 phi2))) (* (pow lambda2 2) (+ (* 1/8 (/ (* (cos phi1) (cos phi2)) (sin (* 1/2 (- phi1 phi2))))) (* 1/2 (/ (* (pow lambda2 2) (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2))))) (sin (* 1/2 (- phi1 phi2))))))))>
#<alt (+ (sin (* 1/2 (- phi1 phi2))) (* (pow lambda2 2) (+ (* 1/8 (/ (* (cos phi1) (cos phi2)) (sin (* 1/2 (- phi1 phi2))))) (* (pow lambda2 2) (+ (* 1/2 (/ (* (pow lambda2 2) (- (* 1/1440 (* (cos phi1) (cos phi2))) (* 1/8 (/ (* (cos phi1) (* (cos phi2) (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))) (sin (* 1/2 (- phi1 phi2))))) (* 1/2 (/ (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (sin (* 1/2 (- phi1 phi2))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))>
#<alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (pow (sin (* 1/2 (- phi1 phi2))) 2)>
#<alt (+ (* 1/4 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (pow lambda2 2) (+ (* -1/48 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/4 (* (cos phi1) (cos phi2))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (pow lambda2 2) (+ (* 1/4 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/48 (* (cos phi1) (cos phi2))) (* 1/1440 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))>
#<alt (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))>
#<alt (+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/4 (* (* phi1 phi2) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))>
#<alt (+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* -1/2 (* (* phi2 (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* 1/4 (* phi1 (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))))>
#<alt (+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/4 (* phi1 (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/12 phi1))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* -1/2 (* (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* -1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))>
#<alt (+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* -1/8 (* (* phi1 (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3))))))))>
#<alt (+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* phi1 (+ (* -1/8 (* (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3))))) (* -1/16 (* (* phi1 (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 5))))))))))>
#<alt (* (sqrt (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (sqrt -1))>
#<alt (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))>
#<alt (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))>
#<alt (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow phi1 7) (* (pow (cos (* -1/2 phi2)) 5) (pow (sin (* -1/2 phi2)) 5))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3) (pow (sqrt -1) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (sqrt -1)))>
#<alt (* -1 (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))>
#<alt (* -1 (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))))>
#<alt (* -1 (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow phi1 7) (* (pow (cos (* -1/2 phi2)) 5) (pow (sin (* -1/2 phi2)) 5))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* -1/2 (* (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda1 (+ (* -1/2 (* (* lambda1 (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda1 (+ (* -1/2 (* (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* lambda1 (+ (* -1/2 (* (* lambda1 (+ (* 1/2 (/ (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* 1/2 (* (* lambda2 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* 1/2 (* (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda2 (+ (* 1/2 (* (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* -1/2 (/ (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/2 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (+ (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/2 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (* (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (* 1/2 (* (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (* (* phi1 (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (+ (* 1/2 (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/12 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (* (* phi2 (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* 1/2 (* (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* -1/12 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (sin phi1) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/2 (/ (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))>
#<alt (- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))>
#<alt (- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))>
#<alt (- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))>
#<alt (- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))>
#<alt (- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))>
#<alt (- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))>
#<alt (- (+ (* phi1 (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (- (+ (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (- (+ (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/12 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))))))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))>
#<alt (- (+ (* phi2 (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (- (+ (* phi2 (- (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (- (+ (* phi2 (- (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* -1/12 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (sin phi1) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))))))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))>
#<alt (sin (* 1/2 lambda2))>
#<alt (+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 lambda1))>
#<alt (+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 lambda2))>
#<alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 lambda1))>
#<alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- 1/2 (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- 1/2 (* 1/2 (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 (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -1 (+ 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 (cos (neg lambda2)))>
#<alt (- (+ 1 (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))>
#<alt (- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))>
#<alt (- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos lambda1))>
#<alt (- (+ 1 (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))>
#<alt (- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))>
#<alt (- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- (cos (neg lambda2)) 1)>
#<alt (- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)>
#<alt (- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)>
#<alt (- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos lambda1) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* -1/2 lambda2))>
#<alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 lambda1))>
#<alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))>
#<alt (- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))>
#<alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* -1/2 phi1)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))>
#<alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1/12 (* phi1 phi2)) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* -1/2 phi1)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))>
#<alt (* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))>
#<alt (* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))>
#<alt (* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))>
#<alt (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))>
#<alt (* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))>
#<alt (* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))>
#<alt (* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- (+ 1 (* -1 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- (+ 1 (* lambda2 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>
#<alt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))>

Calls

327 calls:

Time	Variable		Point	Expression
60.0ms	lambda2	@	-inf	(sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 1)))
34.0ms	phi1	@	0	(sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (- 1 (cos (* (- lambda1 lambda2) 1)))) 2)))
27.0ms	lambda1	@	inf	(+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2)))
25.0ms	R	@	0	(* (atan2 (sqrt (+ (pow (sin (* 1/2 (- phi1 phi2))) 2) (* (pow (sin (* lambda2 -1/2)) 2) (* (cos phi2) (cos phi1))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
25.0ms	phi1	@	0	(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- (- 1 (* (sin (* phi2 -1/2)) (* phi1 (cos (* phi2 -1/2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* phi2 -1/2)) 2)))))))

rewrite337.0ms (0.7%)

Algorithm

1×	batch-egg-rewrite

Rules

3340×	`-lowering-.f32`
3340×	`-lowering-.f64`
2356×	`/-lowering-/.f32`
2356×	`/-lowering-/.f64`
1742×	`+-lowering-+.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	108	1149
1	635	895
2	6248	895
0	8057	895

Stop Event

1×	iter limit
1×	node limit

Counts

31 → 371

Calls

Call 1

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

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

simplify1.1s (2.2%)

Algorithm

1×	egg-herbie

Rules

4942×	`-lowering-.f32`
4942×	`-lowering-.f64`
4070×	`+-lowering-+.f64`
4070×	`+-lowering-+.f32`
1950×	`sum3-define`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	2054	75455
1	5958	73305
0	8021	73305

Stop Event

1×	iter limit
1×	node limit

Counts

1308 → 1308

Calls

Call 1

Inputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* 1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* (sin phi1) (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))) (* -1/12 (sin phi1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* 1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda2 (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* 1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* -1/12 (* phi1 (sin (neg phi2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/12 (* phi2 (sin phi1)))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sin (* 1/2 (- phi1 phi2)))
(+ (sin (* 1/2 (- phi1 phi2))) (* 1/8 (/ (* (pow lambda2 2) (* (cos phi1) (cos phi2))) (sin (* 1/2 (- phi1 phi2))))))
(+ (sin (* 1/2 (- phi1 phi2))) (* (pow lambda2 2) (+ (* 1/8 (/ (* (cos phi1) (cos phi2)) (sin (* 1/2 (- phi1 phi2))))) (* 1/2 (/ (* (pow lambda2 2) (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2))))) (sin (* 1/2 (- phi1 phi2))))))))
(+ (sin (* 1/2 (- phi1 phi2))) (* (pow lambda2 2) (+ (* 1/8 (/ (* (cos phi1) (cos phi2)) (sin (* 1/2 (- phi1 phi2))))) (* (pow lambda2 2) (+ (* 1/2 (/ (* (pow lambda2 2) (- (* 1/1440 (* (cos phi1) (cos phi2))) (* 1/8 (/ (* (cos phi1) (* (cos phi2) (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))) (sin (* 1/2 (- phi1 phi2))))) (* 1/2 (/ (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (sin (* 1/2 (- phi1 phi2))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(pow (sin (* 1/2 (- phi1 phi2))) 2)
(+ (* 1/4 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (pow lambda2 2) (+ (* -1/48 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/4 (* (cos phi1) (cos phi2))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (pow lambda2 2) (+ (* 1/4 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/48 (* (cos phi1) (cos phi2))) (* 1/1440 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/4 (* (* phi1 phi2) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* -1/2 (* (* phi2 (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* 1/4 (* phi1 (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/4 (* phi1 (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/12 phi1))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* -1/2 (* (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* -1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* -1/8 (* (* phi1 (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3))))))))
(+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* phi1 (+ (* -1/8 (* (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3))))) (* -1/16 (* (* phi1 (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 5))))))))))
(* (sqrt (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (sqrt -1))
(* phi1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))
(* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))
(* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow phi1 7) (* (pow (cos (* -1/2 phi2)) 5) (pow (sin (* -1/2 phi2)) 5))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3) (pow (sqrt -1) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))))
(* -1 (* (sqrt (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (sqrt -1)))
(* -1 (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))
(* -1 (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))))
(* -1 (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow phi1 7) (* (pow (cos (* -1/2 phi2)) 5) (pow (sin (* -1/2 phi2)) 5))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* -1/2 (* (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda1 (+ (* -1/2 (* (* lambda1 (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda1 (+ (* -1/2 (* (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* lambda1 (+ (* -1/2 (* (* lambda1 (+ (* 1/2 (/ (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* 1/2 (* (* lambda2 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* 1/2 (* (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda2 (+ (* 1/2 (* (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* -1/2 (/ (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/2 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (+ (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/2 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (* (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (* 1/2 (* (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (* (* phi1 (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (+ (* 1/2 (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/12 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (* (* phi2 (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* 1/2 (* (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* -1/12 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (sin phi1) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/2 (/ (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))
(- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))
(- (+ (* phi1 (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(- (+ (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(- (+ (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/12 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))))))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))
(- (+ (* phi2 (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(- (+ (* phi2 (- (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(- (+ (* phi2 (- (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* -1/12 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (sin phi1) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))))))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(sin (* 1/2 lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 lambda1))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- 1/2 (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (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 (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ 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 (cos (neg lambda2)))
(- (+ 1 (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(- 1 (cos lambda1))
(- (+ 1 (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- (cos (neg lambda2)) 1)
(- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)
(- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)
(- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos lambda1) 1)
(- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)
(- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)
(- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* -1/2 phi1)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1/12 (* phi1 phi2)) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* -1/2 phi1)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))
(* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))
(* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))
(* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))
(* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))
(* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))
(* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))
(* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- (+ 1 (* lambda2 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))

Outputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi1 (-.f64 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* 1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (-.f64 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi1) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* (sin phi1) (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))) (* -1/12 (sin phi1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi1) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (.f64 #s(literal -1/12 binary64) (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi1) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* 1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (.f64 #s(literal -1/12 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda2 (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal -1/16 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))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/12 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal -1/16 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))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal -1/16 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))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(- (+ 1/2 (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(- (+ 1/2 (+ (* 1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi1 (+.f64 (.f64 phi1 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* -1/12 (* phi1 (sin (neg phi2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (.f64 (.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi2 (+.f64 (.f64 phi2 (.f64 #s(literal -1/4 binary64) (-.f64 (.f64 (cos.f64 phi1) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/12 (* phi2 (sin phi1)))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1))))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal -1/12 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda2 (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/12 binary64) lambda2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(+ (sin (* 1/2 (- phi1 phi2))) (* 1/8 (/ (* (pow lambda2 2) (* (cos phi1) (cos phi2))) (sin (* 1/2 (- phi1 phi2))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+ (sin (* 1/2 (- phi1 phi2))) (* (pow lambda2 2) (+ (* 1/8 (/ (* (cos phi1) (cos phi2)) (sin (* 1/2 (- phi1 phi2))))) (* 1/2 (/ (* (pow lambda2 2) (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2))))) (sin (* 1/2 (- phi1 phi2))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (.f64 #s(literal -1/48 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))
(+ (sin (* 1/2 (- phi1 phi2))) (* (pow lambda2 2) (+ (* 1/8 (/ (* (cos phi1) (cos phi2)) (sin (* 1/2 (- phi1 phi2))))) (* (pow lambda2 2) (+ (* 1/2 (/ (* (pow lambda2 2) (- (* 1/1440 (* (cos phi1) (cos phi2))) (* 1/8 (/ (* (cos phi1) (* (cos phi2) (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))) (sin (* 1/2 (- phi1 phi2))))) (* 1/2 (/ (- (* -1/48 (* (cos phi1) (cos phi2))) (* 1/64 (/ (* (pow (cos phi1) 2) (pow (cos phi2) 2)) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (sin (* 1/2 (- phi1 phi2))))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (.f64 (.f64 lambda2 lambda2) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 #s(literal 1/1440 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (.f64 #s(literal -1/48 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/48 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(pow (sin (* 1/2 (- phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))
(+ (* 1/4 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (pow lambda2 2) (+ (* -1/48 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/4 (* (cos phi1) (cos phi2))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 #s(literal -1/48 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2)))))
(+ (* (pow lambda2 2) (+ (* 1/4 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/48 (* (cos phi1) (cos phi2))) (* 1/1440 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 #s(literal -1/48 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/1440 binary64) (.f64 lambda2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 1/4 (* (* phi1 phi2) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* -1/2 (* (* phi2 (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* 1/4 (* phi1 (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (.f64 (.f64 #s(literal 1/4 binary64) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* phi2 (+ (* 1/4 (* phi1 (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))))) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* 1/12 phi1))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (* -1/2 (* (+ 1/4 (+ (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (* 1/16 (/ (pow phi1 2) (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi1 (/.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/12 binary64) phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (.f64 (+.f64 (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* -1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
(+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* -1/8 (* (* phi1 (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi1 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 3 binary64))))))))
(+ (sqrt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* phi1 (+ (* -1/8 (* (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3))))) (* -1/16 (* (* phi1 (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 5))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/16 binary64) (.f64 phi1 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 5 binary64))))))))))
(* (sqrt (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (sqrt -1))
(.f64 (sqrt.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 #s(literal -1 binary64)))
(* phi1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))
(.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))) phi1)) (sqrt.f64 #s(literal -1 binary64)))))
(* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))
(.f64 phi1 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) phi1)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 5 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))))
(* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow phi1 7) (* (pow (cos (* -1/2 phi2)) 5) (pow (sin (* -1/2 phi2)) 5))))) (/ (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3) (pow (sqrt -1) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))))
(.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 5 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) phi1)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 7 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 5 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 5 binary64)))))) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))))))
(* -1 (* (sqrt (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (sqrt -1)))
(neg.f64 (.f64 (sqrt.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))
(.f64 (neg.f64 phi1) (+.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) phi1)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
(* -1 (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1))))))
(.f64 (neg.f64 phi1) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) phi1)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 5 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
(* -1 (* phi1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow phi1 5) (* (pow (cos (* -1/2 phi2)) 3) (pow (sin (* -1/2 phi2)) 3))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow phi1 7) (* (pow (cos (* -1/2 phi2)) 5) (pow (sin (* -1/2 phi2)) 5))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow phi1 3) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (* (sqrt -1) (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (sqrt (/ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) phi1)) (sqrt -1)))))))
(.f64 (neg.f64 phi1) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 5 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) phi1)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 7 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 5 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* -1/2 (* (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda1 (+ (* -1/2 (* (* lambda1 (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))) (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda1 (+ (* -1/2 (* (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* lambda1 (+ (* -1/2 (* (* lambda1 (+ (* 1/2 (/ (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))) (.f64 (+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* 1/2 (* (* lambda2 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* 1/2 (* (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))))))
(+ (sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* lambda2 (+ (* 1/2 (* (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* -1/2 (/ (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* 1/4 (/ (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2))) (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (sqrt (/ 1 (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))
(+.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))) (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))) (.f64 (+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/2 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (+ (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/2 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) (* (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (cos.f64 lambda2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (* 1/2 (* (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (sqrt (/ (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (* (* phi1 (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi1 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (+ (* 1/2 (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/12 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/4 (/ (* (pow (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (-.f64 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal 1/12 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (* (* phi2 (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* 1/2 (* (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (.f64 phi2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (pow.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* -1/12 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (sin phi1) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/2 (/ (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/4 (/ (* (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (pow (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (sqrt (/ (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (.f64 (-.f64 (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (/.f64 (.f64 (sin.f64 phi1) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (pow.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (pow.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(+.f64 (.f64 lambda1 (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(+.f64 (.f64 lambda1 (+.f64 (-.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 3/2)))
(+.f64 (.f64 lambda1 (+.f64 (-.f64 (.f64 lambda1 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (.f64 lambda1 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (cos.f64 lambda2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/12 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) #s(literal -3/2 binary64))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(+.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 3/2)))
(+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/4 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)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))))) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(- (+ (* phi1 (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+.f64 (.f64 phi1 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(- (+ (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+.f64 (.f64 phi1 (+.f64 (-.f64 (.f64 phi1 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(- (+ (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 1/12 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))))))) (+ (* -1/2 (/ (* (sin (neg phi2)) (- (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2)))))) (* -1/2 (/ (* (sin (neg phi2)) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+.f64 (.f64 phi1 (+.f64 (-.f64 (.f64 phi1 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 phi1 (-.f64 (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(- (+ (* phi2 (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+.f64 (.f64 phi2 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(- (+ (* phi2 (- (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(- (+ (* phi2 (- (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (+ (* -1/12 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))) (+ (* 1/2 (/ (* (sin phi1) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))))))) (+ (* 1/2 (/ (* (sin phi1) (- (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (* 1/2 (/ (* (sin phi1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2) 2))))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2))) (/ 1 (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 3/2)))
(+.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 phi2 (-.f64 (-.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (/.f64 (.f64 (sin.f64 phi1) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (/.f64 (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))))) (-.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 3/2))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -3/2 binary64)))
(sin (* 1/2 lambda2))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal 1/48 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 lambda1))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 (.f64 #s(literal -1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 phi1 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(-.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 phi2 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/48 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal 1/12 binary64)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) #s(literal 1/12 binary64))))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))
(- 1/2 (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (sin.f64 (-.f64 #s(literal 0 binary64) 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 (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (* -1 (+ 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 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 lambda1)))) (.f64 #s(literal 1 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 (cos (neg lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 lambda2))
(- (+ 1 (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (cos.f64 lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))) (sin.f64 lambda2))) (cos.f64 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))
(- 1 (cos (* -1 (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))
(- 1 (cos lambda1))
(-.f64 #s(literal 1 binary64) (cos.f64 lambda1))
(- (+ 1 (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) (cos.f64 lambda1)))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/6 binary64) lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))) (sin.f64 lambda1))) (cos.f64 lambda1)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- (cos (neg lambda2)) 1)
(+.f64 (cos.f64 lambda2) #s(literal -1 binary64))
(- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)
(+.f64 (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64))
(- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)
(+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)))
(- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)
(+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64))
(- (cos lambda1) 1)
(+.f64 (cos.f64 lambda1) #s(literal -1 binary64))
(- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))
(- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 lambda1)))) #s(literal -1 binary64)))
(- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 lambda1)))) (.f64 #s(literal 1 binary64) (sin.f64 lambda1)))) #s(literal -1 binary64)))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(- 1 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(- (+ 1 (* 1/2 (* phi1 phi2))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* -1/2 phi1)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1/12 (* phi1 phi2)) (+ 1/4 (* -1/2 (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (* -1/2 phi1)))) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/12 binary64) phi1) phi2) #s(literal -1/4 binary64)) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))
(.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))
(.f64 phi1 (-.f64 (/.f64 #s(literal 1 binary64) phi1) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) phi1) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) phi1)))))
(* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))
(.f64 phi1 (-.f64 (/.f64 #s(literal 1 binary64) phi1) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) phi1) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) phi1)))))
(* phi1 (- (/ 1 phi1) (+ (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (+ (/ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) phi1) (/ (pow (sin (* -1/2 phi2)) 2) phi1)))))
(.f64 phi1 (-.f64 (/.f64 #s(literal 1 binary64) phi1) (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (/.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) phi1) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) phi1)))))
(* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))
(.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))
(.f64 (neg.f64 phi1) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))))
(* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))
(.f64 (neg.f64 phi1) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))))
(* -1 (* phi1 (- (* -1 (/ (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) phi1)) (* -1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))
(.f64 (neg.f64 phi1) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (neg.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (neg.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))
(- (+ 1 (* lambda2 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (.f64 #s(literal -1 binary64) (-.f64 (.f64 (.f64 lambda2 (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))) (* -1 (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* -1/2 phi2)) 2))))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (neg.f64 (.f64 (.f64 lambda2 (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(- 1 (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* -1/2 phi2)) 2))))
(-.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))

eval669.0ms (1.3%)

Compiler: Compiled 222864 to 7181 computations (96.8% saved)

prune658.0ms (1.3%)

Pruning

111 alts after pruning (111 fresh and 0 done)

	Pruned	Kept	Total
New	2375	97	2472
Fresh	43	14	57
Picked	5	0	5
Done	0	0	0
Total	2423	111	2534

Accuracy

78.6%

Counts

2534 → 111

Alt Table

Click to see full alt table

Status	Accuracy	Program
	42.0%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	40.9%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	40.4%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	16.9%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	57.5%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	29.1%	(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
▶	76.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	41.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	52.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	75.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	67.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	41.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	43.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	76.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	33.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
	45.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
▶	47.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	48.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	48.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	49.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	49.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 6 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (+.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	61.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	47.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	48.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
▶	47.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	48.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	37.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	25.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	35.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	34.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	32.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	48.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	28.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	30.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	31.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
▶	57.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	41.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	39.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	56.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	37.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	34.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	56.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	41.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	42.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	41.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	42.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	38.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
	58.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	41.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	46.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	47.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	31.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	40.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
	42.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
▶	16.5%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.6%	(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	60.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	60.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
	36.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))))))
	36.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 6 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))))
	40.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	42.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	27.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	35.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	48.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
	47.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
	8.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))

Compiler

Compiled 19088 to 9684 computations (49.3% saved)

simplify264.0ms (0.5%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	7168	(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64)))
✓	cost-diff	7168	(sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))
✓	cost-diff	7168	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64)))))
✓	cost-diff	7168	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	0	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	0	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	cost-diff	0	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
✓	cost-diff	0	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
✓	cost-diff	448	(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))
✓	cost-diff	448	(sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))
✓	cost-diff	832	(atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
✓	cost-diff	832	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
✓	cost-diff	0	(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
✓	cost-diff	0	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
✓	cost-diff	0	(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))))
✓	cost-diff	0	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	6400	(+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	6400	(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	cost-diff	6400	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))
✓	cost-diff	6400	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))

Rules

3916×	`+-lowering-+.f64`
3916×	`+-lowering-+.f32`
2936×	`-lowering-.f32`
2936×	`-lowering-.f64`
1298×	`sum4-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	106	2446
1	256	2375
2	714	2305
3	2221	2255
0	8102	2255

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* (atan2 (sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2))))) (* R 2))
(atan2 (sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2)))))
(sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))))
(+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))
(pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2)
(+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))))
(sin (/ phi1 2))
(/ phi1 2)
phi1
2
(cos (/ phi2 2))
(/ phi2 2)
phi2
(* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))
(cos (/ phi1 2))
(- 0 (sin (/ phi2 2)))
0
(sin (/ phi2 2))
(* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))
(sin (/ (- lambda1 lambda2) 2))
(/ (- lambda1 lambda2) 2)
(- lambda1 lambda2)
lambda1
lambda2
(sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2))))
(+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2)))
1
(- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2))
(* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2))))
(* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))
(sin (/ (- lambda1 lambda2) -2))
(/ (- lambda1 lambda2) -2)
-2
(pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2)
(- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2))))
(* (sin (/ phi1 2)) (cos (/ phi2 2)))
(* (cos (/ phi1 2)) (sin (/ phi2 2)))
(* R 2)
R
(* (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))))
(sin (* 1/2 (- phi1 phi2)))
(* 1/2 (- phi1 phi2))
1/2
(- phi1 phi2)
phi1
phi2
(sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))
(+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))
1
(- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))
(* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))
(sin (/ (- lambda1 lambda2) 2))
(/ (- lambda1 lambda2) 2)
(- lambda1 lambda2)
lambda1
lambda2
2
(sin (/ (- lambda1 lambda2) -2))
(/ (- lambda1 lambda2) -2)
-2
(pow (sin (/ (- phi1 phi2) 2)) 2)
(sin (/ (- phi1 phi2) 2))
(/ (- phi1 phi2) 2)
(* R 2)
R
(* (atan2 (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))) (sqrt (+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2)))) (* R 2))
(atan2 (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))) (sqrt (+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2))))
(sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2)))
(+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))
(- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))
1/2
(* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))
(cos (* 2 (/ (- phi1 phi2) 2)))
(* 2 (/ (- phi1 phi2) 2))
2
(/ (- phi1 phi2) 2)
(- phi1 phi2)
phi1
phi2
(/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2)
(* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2))))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))
(+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1)
(+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2)))))
(* 1/2 (cos (* 2 (- lambda1 lambda2))))
(cos (* 2 (- lambda1 lambda2)))
(* 2 (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
-1
(neg (+ 1 (cos (- lambda1 lambda2))))
(+ 1 (cos (- lambda1 lambda2)))
1
(cos (- lambda1 lambda2))
(sqrt (+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2)))
(+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2))
(+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))
(/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2)
(* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2)))
(+ (cos (* (- lambda1 lambda2) 1)) -1)
(cos (* (- lambda1 lambda2) 1))
(* (- lambda1 lambda2) 1)
(* R 2)
R
(* (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))))
(sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))))
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))
(pow (sin (/ (- phi1 phi2) 2)) 2)
(sin (/ (- phi1 phi2) 2))
(/ (- phi1 phi2) 2)
(- phi1 phi2)
phi1
phi2
2
(* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))
(sin (/ (- lambda1 lambda2) 2))
(/ (- lambda1 lambda2) 2)
(- lambda1 lambda2)
lambda1
lambda2
(sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))
(+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))
1
(- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))
(* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2))))
(* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))
(sin (* 1/2 lambda2))
(* 1/2 lambda2)
1/2
(* R 2)
R
(* (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1)))) (* R 2))
(atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1))))
(sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))))
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))
(pow (sin (/ (- phi1 phi2) 2)) 2)
(sin (/ (- phi1 phi2) 2))
(/ (- phi1 phi2) 2)
(- phi1 phi2)
phi1
phi2
2
(* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))
(sin (/ (- lambda1 lambda2) 2))
(/ (- lambda1 lambda2) 2)
(- lambda1 lambda2)
lambda1
lambda2
(sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1)))
(/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1))
(- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1)
(pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2)
(- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))))
(/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2)
(* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2)))
(+ (cos (* (- lambda1 lambda2) 1)) -1)
(cos (* (- lambda1 lambda2) 1))
(* (- lambda1 lambda2) 1)
1
-1
(- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))
1/2
(* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))
(cos (* 2 (/ (- phi1 phi2) 2)))
(* 2 (/ (- phi1 phi2) 2))
(- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1)
(- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2))))
(+ 1/2 (* -1/2 (cos phi2)))
(* -1/2 (cos phi2))
-1/2
(* R 2)
R

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

localize1.8s (3.5%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	77.3%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	77.1%	(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
✓	accuracy	76.7%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
✓	accuracy	74.6%	(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))
✓	accuracy	99.2%	(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))))
✓	accuracy	99.0%	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	accuracy	78.5%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	77.3%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	77.1%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	77.1%	(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
✓	accuracy	77.0%	(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
✓	accuracy	76.7%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
✓	accuracy	78.5%	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
✓	accuracy	78.5%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	77.3%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	77.3%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
✓	accuracy	99.0%	(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	accuracy	98.5%	(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))
✓	accuracy	77.3%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	77.3%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))

Results

1.3s	249×	1	valid
27.0ms	7×	1	invalid

Compiler

Compiled 2554 to 107 computations (95.8% saved)

Precisions

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

ival-cos: 222.0ms (25.7% of total)

ival-sin: 151.0ms (17.5% of total)

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

ival-div: 73.0ms (8.4% of total)

ival-sqrt: 69.0ms (8% of total)

backward-pass: 67.0ms (7.7% of total)

ival-add: 47.0ms (5.4% of total)

ival-atan2: 47.0ms (5.4% of total)

ival-sub: 45.0ms (5.2% of total)

ival-pow: 23.0ms (2.7% of total)

compiled-spec: 9.0ms (1% of total)

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

const: 2.0ms (0.2% of total)

series395.0ms (0.8%)

Counts

30 → 1248

Calls

Call 1

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

Outputs
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))>
#<alt (+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (* -1/2 phi2)>
#<alt (+ (* -1/2 phi2) (* 1/2 phi1))>
#<alt (+ (* -1/2 phi2) (* 1/2 phi1))>
#<alt (+ (* -1/2 phi2) (* 1/2 phi1))>
#<alt (* 1/2 phi1)>
#<alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))>
#<alt (* 1/2 phi1)>
#<alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* 1/2 phi1)>
#<alt (+ (* -1/2 phi2) (* 1/2 phi1))>
#<alt (+ (* -1/2 phi2) (* 1/2 phi1))>
#<alt (+ (* -1/2 phi2) (* 1/2 phi1))>
#<alt (* -1/2 phi2)>
#<alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))>
#<alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))>
#<alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))>
#<alt (* -1/2 phi2)>
#<alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* 1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* (sin phi1) (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))) (* -1/12 (sin phi1)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* -1/2 (- (* 2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (+ 1 (cos (neg lambda2))))) (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))) (* -1/4 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* 1/2 (* (* lambda2 (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* -1/2 (- (* -2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (+ 1 (cos lambda1))))))) (* -1/4 (/ (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* 1/2 (* phi1 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))) (* lambda1 (+ (* -1/2 (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))) (* lambda1 (+ (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (* lambda1 (+ (* -1/2 (* lambda1 (- (* 2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (+ 1 (cos (neg lambda2))))) (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))) (* lambda2 (+ (* -1/2 (* lambda2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1))))))) (* -1/2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))) (* lambda2 (+ (* -1/2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (* lambda2 (+ (* -1/2 (* lambda2 (- (* -2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (+ 1 (cos lambda1)))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))>
#<alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (+ (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (* 1/2 (* (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (* 1/2 (* (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (* 1/2 (* (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (* (* phi1 (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (+ (* -1/2 (* (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* 1/2 (* (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))) (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (+ (* -1/2 (* (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))) (* 1/2 (* (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (sin (neg phi2)) (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (* 1/4 (/ (* (cos phi2) (* (sin (neg phi2)) (* (- (cos (- lambda1 lambda2)) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 1/2 (* (* phi2 (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))))>
#<alt (+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (+ (* 1/2 (* (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (+ (* 1/2 (/ (* (sin phi1) (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (sin phi1) (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (- (+ (* -1 (/ (* phi1 (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (- (+ (* phi1 (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (- (+ (* phi1 (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (* 1/4 (/ (* (cos phi2) (* (sin (neg phi2)) (* (- (cos (- lambda1 lambda2)) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))>
#<alt (- (+ (/ (* phi2 (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))>
#<alt (- (+ (* phi2 (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))>
#<alt (- (+ (* phi2 (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (+ (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))>
#<alt (sin (* 1/2 lambda2))>
#<alt (+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 lambda1))>
#<alt (+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 lambda2))>
#<alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 lambda1))>
#<alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (- phi1 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (cos (* -2 lambda2))>
#<alt (+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))>
#<alt (+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))>
#<alt (+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2))))))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* -2 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -2 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -2 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -2 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* 2 lambda1))>
#<alt (+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))>
#<alt (+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))>
#<alt (+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1))))))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (- lambda1 lambda2)))>
#<alt (cos (* 2 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (* 2 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (* 2 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (* 2 (+ lambda1 (* -1 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 (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (* -1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (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 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* -1/8 (* lambda1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* lambda1 (+ (* -1/8 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* -1/48 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* lambda2 (+ (* -1/4 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (sin (* 1/2 lambda1))) (* -1/48 (sin (* 1/2 lambda1)))))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (* 1/4 (pow phi2 2))>
#<alt (* (pow phi2 2) (+ 1/4 (* -1/48 (pow phi2 2))))>
#<alt (* (pow phi2 2) (+ 1/4 (* (pow phi2 2) (- (* 1/1440 (pow phi2 2)) 1/48))))>
#<alt (* (pow phi2 2) (+ 1/4 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/1440 (* -1/80640 (pow phi2 2)))) 1/48))))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>
#<alt (+ 1/2 (* -1/2 (cos phi2)))>

Calls

312 calls:

Time	Variable		Point	Expression
22.0ms	phi1	@	inf	(sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1)))
21.0ms	phi2	@	-inf	(sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2)))
20.0ms	lambda1	@	inf	(* (atan2 (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))) (sqrt (+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2)))) (* R 2))
15.0ms	phi2	@	inf	(atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1))))
14.0ms	lambda2	@	-inf	(* (atan2 (sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2))))) (* R 2))

rewrite506.0ms (1%)

Algorithm

1×	batch-egg-rewrite

Rules

3438×	`-lowering-.f32`
3438×	`-lowering-.f64`
2632×	`/-lowering-/.f32`
2632×	`/-lowering-/.f64`
1852×	`+-lowering-+.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	106	1127
1	671	866
2	7325	866
0	8141	866

Stop Event

1×	iter limit
1×	node limit

Counts

30 → 416

Calls

Call 1

Inputs
(* (atan2 (sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2))))) (* R 2))
(atan2 (sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2)))))
(sqrt (+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))))
(+ (pow (+ (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))
(* (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))))
(sin (* 1/2 (- phi1 phi2)))
(* 1/2 (- phi1 phi2))
(* (atan2 (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))) (sqrt (+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2)))) (* R 2))
(atan2 (sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))) (sqrt (+ (+ 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2))))
(sqrt (+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2)))
(+ (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2))))) (/ (* (* (cos phi1) (cos phi2)) (/ (+ (+ 1/2 (* 1/2 (cos (* 2 (- lambda1 lambda2))))) -1) (neg (+ 1 (cos (- lambda1 lambda2)))))) 2))
(* (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2))))) (* R 2))
(atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))))
(sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))))
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))
(* (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1)))) (* R 2))
(atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1))))
(sqrt (/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1)))
(/ (- (pow (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))) 2) 1) (- (- (/ (* (+ (cos (* (- lambda1 lambda2) 1)) -1) (* (cos phi1) (cos phi2))) 2) (+ 1/2 (* -1/2 (cos phi2)))) 1))
(sin (/ (- lambda1 lambda2) -2))
(sin (/ (- lambda1 lambda2) 2))
(+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2)))
(sin (/ (- phi1 phi2) 2))
(- 1/2 (* 1/2 (cos (* 2 (/ (- phi1 phi2) 2)))))
(cos (* 2 (- lambda1 lambda2)))
(cos (* (- lambda1 lambda2) 1))
(cos (- lambda1 lambda2))
(+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (* 1/2 lambda2)))) (pow (sin (/ (- phi1 phi2) 2)) 2)))
(+ 1/2 (* -1/2 (cos phi2)))

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

simplify1.1s (2.2%)

Algorithm

1×	egg-herbie

Rules

6306×	`-lowering-.f32`
6306×	`-lowering-.f64`
3448×	`+-lowering-+.f64`
3448×	`+-lowering-+.f32`
1950×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1974	72351
1	6633	71693
0	8057	71693

Stop Event

1×	iter limit
1×	node limit

Counts

1248 → 1248

Calls

Call 1

Inputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(* -1/2 phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* -1/2 phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* -1/2 phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* 1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* (sin phi1) (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))) (* -1/12 (sin phi1)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* -1/2 (- (* 2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (+ 1 (cos (neg lambda2))))) (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))) (* -1/4 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* 1/2 (* (* lambda2 (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* -1/2 (- (* -2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (+ 1 (cos lambda1))))))) (* -1/4 (/ (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* 1/2 (* phi1 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))) (* lambda1 (+ (* -1/2 (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))) (* lambda1 (+ (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (* lambda1 (+ (* -1/2 (* lambda1 (- (* 2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (+ 1 (cos (neg lambda2))))) (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))) (* lambda2 (+ (* -1/2 (* lambda2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1))))))) (* -1/2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))) (* lambda2 (+ (* -1/2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (* lambda2 (+ (* -1/2 (* lambda2 (- (* -2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (+ 1 (cos lambda1)))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (+ (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (* 1/2 (* (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (* 1/2 (* (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (* 1/2 (* (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (* (* phi1 (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (+ (* -1/2 (* (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* 1/2 (* (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))) (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (+ (* -1/2 (* (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))) (* 1/2 (* (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (sin (neg phi2)) (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (* 1/4 (/ (* (cos phi2) (* (sin (neg phi2)) (* (- (cos (- lambda1 lambda2)) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 1/2 (* (* phi2 (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (+ (* 1/2 (* (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (+ (* 1/2 (/ (* (sin phi1) (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (sin phi1) (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))
(- (+ (* -1 (/ (* phi1 (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(- (+ (* phi1 (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(- (+ (* phi1 (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (* 1/4 (/ (* (cos phi2) (* (sin (neg phi2)) (* (- (cos (- lambda1 lambda2)) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))
(- (+ (/ (* phi2 (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(- (+ (* phi2 (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(- (+ (* phi2 (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (+ (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(sin (* 1/2 lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 lambda1))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- 1/2 (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(cos (* -2 lambda2))
(+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2))))))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos (* 2 lambda1))
(+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1))))))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos (* 2 (+ lambda1 (* -1 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 (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (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 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (+ (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(- (+ 1 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda1 (+ (* -1/8 (* lambda1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* lambda1 (+ (* -1/8 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* -1/48 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* lambda2 (+ (* -1/4 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (sin (* 1/2 lambda1))) (* -1/48 (sin (* 1/2 lambda1)))))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 1/4 (pow phi2 2))
(* (pow phi2 2) (+ 1/4 (* -1/48 (pow phi2 2))))
(* (pow phi2 2) (+ 1/4 (* (pow phi2 2) (- (* 1/1440 (pow phi2 2)) 1/48))))
(* (pow phi2 2) (+ 1/4 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/1440 (* -1/80640 (pow phi2 2)))) 1/48))))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))
(+ 1/2 (* -1/2 (cos phi2)))

Outputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (neg.f64 phi1) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (neg.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (neg.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64))))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) phi2) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (+.f64 (neg.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (+.f64 (neg.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 phi2 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (neg.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (.f64 phi2 (+.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))
(* 1/2 phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(.f64 (neg.f64 phi1) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(.f64 (neg.f64 phi1) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(.f64 (neg.f64 phi1) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2)))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2)))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2)))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))))) (.f64 phi1 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* 1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (+.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 1/12 binary64)) (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))))) (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/4 (/ (* (sin phi1) (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))) (* -1/12 (sin phi1)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (* 1/2 (* (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (+ (* -1/4 (cos phi1)) (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sin.f64 phi1) (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (.f64 (sin.f64 phi1) #s(literal -1/12 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))))) (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 lambda1 (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* -1/2 (- (* 2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (+ 1 (cos (neg lambda2))))) (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))) (* -1/4 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* 1/16 (/ (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal 2/3 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* 1/2 (* (* lambda2 (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))))
(+ (sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* -1/4 (* (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* -1/2 (- (* -2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (+ 1 (cos lambda1))))))) (* -1/4 (/ (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))))) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (* 1/16 (/ (pow (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) 2) (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -2/3 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(sqrt (- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* 1/2 (* phi1 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (sin.f64 (-.f64 #s(literal 0 binary64) phi2)))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2)))))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi1 (- (* phi1 (- (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (/ (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2))))))) (* 1/2 (cos (neg phi2))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2))))) (* phi2 (- (* phi2 (- (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (/ (* (cos phi1) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2)) (+ 1 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1))))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda1 (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))) (* lambda1 (+ (* -1/2 (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda1 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 lambda2))) 1/2))) (+ 1 (cos (neg lambda2))))) (* lambda1 (+ (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (* lambda1 (+ (* -1/2 (* lambda1 (- (* 2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))) (+ 1 (cos (neg lambda2))))) (+ (* -1/2 (/ (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (+ (* -1 (/ (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (* -2 lambda2)))) (+ 1 (cos (neg lambda2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2))))) (+ 1 (cos (neg lambda2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* 1/2 (cos (* -2 lambda2))) 1/2)))) (pow (+ 1 (cos (neg lambda2))) 2)))))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 #s(literal 2/3 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))) (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2)) #s(literal 2 binary64))))))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* -2 (+ lambda2 (* -1 lambda1))))) 1/2))) (+ 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* -1/2 (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))) (* lambda2 (+ (* -1/2 (* lambda2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1))))))) (* -1/2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda2 (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2))) (+ 1 (cos lambda1)))) (* lambda2 (+ (* -1/2 (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (* lambda2 (+ (* -1/2 (* lambda2 (- (* -2/3 (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))) (+ 1 (cos lambda1)))))))) (* -1/2 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (cos (* 2 lambda1)))) (+ 1 (cos lambda1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2))) (/ (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin (* 2 lambda1)))) (+ 1 (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/2 (cos (* 2 lambda1))) 1/2)))) (pow (+ 1 (cos lambda1)) 2)))) (+ 1 (cos lambda1)))))))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 #s(literal -2/3 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))) (-.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64))) (cos.f64 lambda1))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (.f64 (sin.f64 lambda1) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (- lambda1 lambda2)))) 1/2))) (+ 1 (cos (- lambda1 lambda2)))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (* -1/2 (/ (* (cos phi1) (* (cos phi2) (- (* 1/2 (cos (* 2 (+ lambda1 (* -1 lambda2))))) 1/2))) (+ 1 (cos (+ lambda1 (* -1 lambda2))))))) (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 phi1 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) phi2) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (+.f64 (neg.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (+.f64 (neg.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 phi2 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (neg.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (* (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))) (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (+ (* 1/2 (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (* 1/2 (* (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (.f64 lambda1 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (* (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (* 1/2 (* (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (* 1/2 (* (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (* (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (+ (* 1/4 (/ (* (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (pow (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))) 2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))) (.f64 lambda2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (pow.f64 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (* (* phi1 (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (+ (* -1/2 (* (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* 1/2 (* (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))) (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (+ (* -1/2 (* (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))) (* 1/2 (* (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (sin (neg phi2)) (* (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/4 (/ (* (pow (sin (neg phi2)) 2) (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (* 1/4 (/ (* (cos phi2) (* (sin (neg phi2)) (* (- (cos (- lambda1 lambda2)) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))) (sqrt (/ (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 phi1 (.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 1/2 (* (* phi2 (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 (sin.f64 phi1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))) (* 1/2 (* (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (.f64 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (.f64 (sin.f64 phi1) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))
(+ (sqrt (/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (+ (* 1/2 (* (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (sqrt (/ 1 (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (+ (* 1/2 (/ (* (sin phi1) (* (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (+ (* 1/4 (/ (* (pow (sin phi1) 2) (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2)) (* (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (/ (* (sin phi1) (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2))))) (sqrt (/ (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))))))))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 phi2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 (sin.f64 phi1) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 phi1) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (.f64 (sin.f64 phi1) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)))) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(sqrt (/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 lambda1 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 lambda1 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (-.f64 (.f64 lambda1 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda1 (- (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2)))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 lambda1 (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (-.f64 (.f64 lambda1 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 lambda1 (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 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 (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal 1/12 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (neg.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 lambda1))) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* lambda2 (- (+ (* -1/4 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* -1/12 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))))))))) (+ (* -1/4 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2)))) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) 1)))) (pow (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))) (/ (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) 1/2) 2) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda1))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/12 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))))) (+.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(- (+ (* -1 (/ (* phi1 (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (neg.f64 (/.f64 (.f64 phi1 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(- (+ (* phi1 (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 phi1 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 phi1 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(- (+ (* phi1 (+ (* -1 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* 1/4 (/ (pow (sin (neg phi2)) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (+ (* 2 (/ (* (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* phi1 (- (+ (* -1 (/ (* (sin (neg phi2)) (+ (* -1/4 (cos (neg phi2))) (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (* 1/6 (/ (* (sin (neg phi2)) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))) (* 1/4 (/ (* (cos phi2) (* (sin (neg phi2)) (* (- (cos (- lambda1 lambda2)) 1) (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2)))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (* -1/4 (/ (* (cos phi2) (* (- (cos (- lambda1 lambda2)) 1) (- (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1))) (pow (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))) 2))))))) (/ (pow (- (+ (* 1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2)))))) (/ 1 (- (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ 3/2 (* -1/2 (cos phi2))))))
(+.f64 (.f64 phi1 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 phi1 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (.f64 phi1 (+.f64 (neg.f64 (/.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))) (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))
(- (+ (/ (* phi2 (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(+.f64 (/.f64 (.f64 (.f64 phi2 (sin.f64 phi1)) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))
(- (+ (* phi2 (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(+.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (.f64 phi2 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))
(- (+ (* phi2 (+ (* phi2 (- (+ (* 1/4 (/ (pow (sin phi1) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (+ (* 2 (/ (* (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (* phi2 (- (+ (* -1/6 (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (+ (* -1/4 (cos phi1)) (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ (* (sin phi1) (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2))) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))))) (/ (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1/4) (- (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) 1)) (pow (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1) 2)))) (/ (* (sin phi1) (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2)) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))) (/ (pow (- (+ (* 1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) 1/2) 2) (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1))) (/ 1 (- (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) 1)))
(+.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (.f64 phi2 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)))) (.f64 phi2 (+.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (-.f64 (/.f64 (.f64 (sin.f64 phi1) (.f64 #s(literal -1/4 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (.f64 (sin.f64 phi1) (.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)))) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64))))))) (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1/4 binary64)) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(/ (- (pow (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) 1/2) 2) 1) (- (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (+ 3/2 (* -1/2 (cos phi2)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))))
(sin (* 1/2 lambda2))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 (.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal 1/48 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* -1/2 lambda1))
(sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda1 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal -1/48 binary64) lambda2) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(- (+ 1 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* -1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))))) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (neg.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 phi2 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi2) (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* -1/48 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (+ (* 1/48 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/16 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* -1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2)))) (* 1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) #s(literal -1/16 binary64)) (.f64 #s(literal -1/48 binary64) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) #s(literal 1/12 binary64)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* -1/48 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1)))) (+ (* 1/48 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/16 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (* (cos (* -1/2 lambda1)) (cos (* 1/2 lambda1)))) (* -1/4 (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda1)))) (* 1/2 (* (cos (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda1)) (sin (* 1/2 lambda1))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) #s(literal 1/12 binary64))))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1))))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal -1/2 binary64)) (.f64 phi2 (+.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(- 1/2 (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(cos (* -2 lambda2))
(cos.f64 (*.f64 lambda2 #s(literal -2 binary64)))
(+ (cos (* -2 lambda2)) (* -2 (* lambda1 (sin (* -2 lambda2)))))
(+.f64 (cos.f64 (.f64 lambda2 #s(literal -2 binary64))) (.f64 (.f64 #s(literal -2 binary64) lambda1) (sin.f64 (.f64 lambda2 #s(literal -2 binary64)))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* -2 (* lambda1 (cos (* -2 lambda2)))) (* 2 (sin (* -2 lambda2))))))
(+.f64 (cos.f64 (.f64 lambda2 #s(literal -2 binary64))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) (.f64 #s(literal -2 binary64) (sin.f64 (*.f64 lambda2 #s(literal -2 binary64)))))))
(+ (cos (* -2 lambda2)) (* lambda1 (- (* lambda1 (+ (* -2 (cos (* -2 lambda2))) (* 4/3 (* lambda1 (sin (* -2 lambda2)))))) (* 2 (sin (* -2 lambda2))))))
(+.f64 (cos.f64 (.f64 lambda2 #s(literal -2 binary64))) (.f64 lambda1 (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -2 binary64) (cos.f64 (.f64 lambda2 #s(literal -2 binary64)))) (.f64 (.f64 #s(literal 4/3 binary64) lambda1) (sin.f64 (.f64 lambda2 #s(literal -2 binary64)))))) (.f64 #s(literal -2 binary64) (sin.f64 (.f64 lambda2 #s(literal -2 binary64)))))))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))
(cos (* -2 (+ lambda2 (* -1 lambda1))))
(cos.f64 (*.f64 (+.f64 lambda2 (neg.f64 lambda1)) #s(literal -2 binary64)))
(cos (* 2 lambda1))
(cos.f64 (*.f64 #s(literal 2 binary64) lambda1))
(+ (cos (* 2 lambda1)) (* 2 (* lambda2 (sin (* 2 lambda1)))))
(+.f64 (cos.f64 (.f64 #s(literal 2 binary64) lambda1)) (.f64 (.f64 #s(literal 2 binary64) lambda2) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* -2 (* lambda2 (cos (* 2 lambda1)))) (* -2 (sin (* 2 lambda1))))))
(+.f64 (cos.f64 (.f64 #s(literal 2 binary64) lambda1)) (.f64 lambda2 (.f64 #s(literal -2 binary64) (-.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))))))
(+ (cos (* 2 lambda1)) (* lambda2 (- (* lambda2 (+ (* -2 (cos (* 2 lambda1))) (* -4/3 (* lambda2 (sin (* 2 lambda1)))))) (* -2 (sin (* 2 lambda1))))))
(+.f64 (cos.f64 (.f64 #s(literal 2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) (.f64 (.f64 #s(literal -4/3 binary64) lambda2) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 #s(literal 2 binary64) (sin.f64 (.f64 #s(literal 2 binary64) lambda1))))))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (- lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (* 2 (+ lambda1 (* -1 lambda2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 (neg.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (sin.f64 (-.f64 #s(literal 0 binary64) 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 (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 lambda1)))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 lambda1)))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 lambda1)))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 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 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (.f64 #s(literal 1 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))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 (neg.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (sin.f64 (-.f64 #s(literal 0 binary64) 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 lambda2 (neg.f64 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (+.f64 lambda2 (neg.f64 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 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 #s(literal -1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))))) (.f64 #s(literal 1 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 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* -1/2 phi2)) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(- (+ 1 (+ (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (neg.f64 phi1) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 phi2)) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (.f64 (neg.f64 phi1) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 phi2 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi2) (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ 1 (+ (* lambda1 (+ (* -1/8 (* lambda1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* lambda1 (+ (* -1/8 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* -1/48 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal -1/48 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ 1 (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ 1 (* lambda2 (+ (* -1/4 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (sin (* 1/2 lambda1))) (* -1/48 (sin (* 1/2 lambda1)))))))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal -1/12 binary64))))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(* 1/4 (pow phi2 2))
(.f64 #s(literal 1/4 binary64) (.f64 phi2 phi2))
(* (pow phi2 2) (+ 1/4 (* -1/48 (pow phi2 2))))
(.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/48 binary64) (.f64 phi2 phi2))))
(* (pow phi2 2) (+ 1/4 (* (pow phi2 2) (- (* 1/1440 (pow phi2 2)) 1/48))))
(.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/1440 binary64)) #s(literal -1/48 binary64)))))
(* (pow phi2 2) (+ 1/4 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/1440 (* -1/80640 (pow phi2 2)))) 1/48))))
(.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/1440 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/80640 binary64)))) #s(literal -1/48 binary64)))))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(+ 1/2 (* -1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))

eval919.0ms (1.8%)

Compiler: Compiled 209988 to 6855 computations (96.7% saved)

prune1.2s (2.3%)

Pruning

168 alts after pruning (168 fresh and 0 done)

	Pruned	Kept	Total
New	2267	87	2354
Fresh	25	81	106
Picked	5	0	5
Done	0	0	0
Total	2297	168	2465

Accuracy

78.7%

Counts

2465 → 168

Alt Table

Click to see full alt table

Status	Accuracy	Program
	17.7%	(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	17.7%	(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	16.3%	(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.3%	(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.6%	(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	17.7%	(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	42.1%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	40.4%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	13.4%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	14.4%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.2%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.9%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	14.2%	(.f64 (atan2.f64 (.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
▶	57.5%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	29.1%	(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	42.6%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	42.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	48.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	51.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	75.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	49.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	58.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	58.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	60.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	49.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	45.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	41.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	52.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
▶	75.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	67.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	43.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	55.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	33.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	46.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
	48.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	48.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	48.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	40.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	29.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	35.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	35.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	47.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	47.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 6 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	35.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	61.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	47.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	48.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
▶	38.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	44.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	33.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	37.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	25.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	35.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	34.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	28.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	31.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	34.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	44.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	41.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	39.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	56.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	37.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	34.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	51.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	56.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	56.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	41.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	38.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
	58.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	41.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	34.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	38.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	47.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	35.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	46.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	48.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	36.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	44.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	31.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	42.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	43.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	40.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
	42.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	11.4%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	6.7%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	8.6%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.0%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
▶	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	11.9%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	14.3%	(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	12.9%	(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	12.3%	(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.0%	(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	11.2%	(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.1%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.0%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	16.4%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	17.1%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	14.3%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	13.4%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.4%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	60.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	60.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
	36.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))))))
	36.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 6 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))))
▶	40.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	42.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	27.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	35.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	47.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
	8.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))

Compiler

Compiled 27598 to 14544 computations (47.3% saved)

simplify246.0ms (0.5%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	6528	(sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
✓	cost-diff	6528	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
✓	cost-diff	6528	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
✓	cost-diff	6528	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
✓	cost-diff	0	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	0	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	cost-diff	0	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
✓	cost-diff	0	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	6400	(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))
✓	cost-diff	6400	(sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))
✓	cost-diff	6784	(atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
✓	cost-diff	6784	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	6656	(+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))
✓	cost-diff	6656	(sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))
✓	cost-diff	6656	(atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))))
✓	cost-diff	6656	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
✓	cost-diff	1024	(+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	cost-diff	1024	(sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	cost-diff	1024	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))
✓	cost-diff	1024	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))

Rules

3276×	`-lowering-.f32`
3276×	`-lowering-.f64`
1590×	`fma-lowering-fma.f32`
1590×	`fma-lowering-fma.f64`
1388×	`fmsub-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	132	2679
1	348	2612
2	1000	2423
3	3490	2373
0	8483	2373

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize1.8s (3.5%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.1%	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓	accuracy	88.0%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	82.7%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	82.7%	(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
✓	accuracy	99.4%	(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
✓	accuracy	99.1%	(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
✓	accuracy	88.0%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	82.7%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	83.1%	(cos.f64 (*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
✓	accuracy	81.8%	(+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))
✓	accuracy	81.0%	(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
✓	accuracy	81.0%	(+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64))
✓	accuracy	83.1%	(cos.f64 (*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
✓	accuracy	82.7%	(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	81.8%	(+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))
✓	accuracy	81.0%	(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))
✓	accuracy	95.8%	(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
✓	accuracy	88.0%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓	accuracy	88.0%	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
✓	accuracy	81.2%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))))))

Results

1.1s	205×	1	valid
117.0ms	49×	0	invalid
8.0ms	2×	1	invalid

Compiler

Compiled 2736 to 132 computations (95.2% saved)

Precisions

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

ival-cos: 271.0ms (29.4% of total)

ival-mult: 194.0ms (21.1% of total)

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

backward-pass: 60.0ms (6.5% of total)

ival-sub: 51.0ms (5.5% of total)

ival-div: 36.0ms (3.9% of total)

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

ival-sqrt: 31.0ms (3.4% of total)

ival-pow: 30.0ms (3.3% of total)

compiled-spec: 28.0ms (3% of total)

ival-atan2: 26.0ms (2.8% of total)

const: 2.0ms (0.2% of total)

series497.0ms (1%)

Counts

33 → 1368

Calls

Call 1

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

Outputs
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (sin (* 1/2 phi2)))) (+ (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (+ (* -1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (/ (* (cos (* 1/2 phi2)) (- (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (sin (* 1/2 phi2)))))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* -1/2 (* (/ (* phi2 (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* phi2 (+ (* -1/2 (* (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* phi2 (+ (* -1/2 (* (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 5))) (+ (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (pow (- 1/2 (* 1/2 (cos phi1))) 2) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))))) (* (pow (sin (* 1/2 phi1)) 3) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (+ (/ (* (cos (* 1/2 phi1)) (- (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (sin (* 1/2 phi1))) (/ (* (+ (* -1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))>
#<alt (+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (sin (* 1/2 phi2)))) (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (+ (* -1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (/ (* (cos (* 1/2 phi2)) (- (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (sin (* 1/2 phi2)))))))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* -1 (/ (* phi2 (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 3))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 5))) (+ (/ (* (cos (* 1/2 phi1)) (- (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (sin (* 1/2 phi1))) (/ (* (+ (* -1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))>
#<alt (* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))>
#<alt (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))>
#<alt (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* -1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* phi1 (+ (* -1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2)))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* phi1 (+ (* -1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/4 (/ (* (sin (neg phi2)) (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2)))))) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* -1/12 (sin (neg phi2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* 1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* phi2 (+ (* 1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* phi2 (+ (* 1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* 1/12 (sin phi1)) (* 1/4 (/ (* (sin phi1) (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* 1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda2 (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))>
#<alt (+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* phi1 (- (* phi1 (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* 1/4 (cos (neg phi2))))) (* 1/2 (sin (neg phi2))))))) (* -1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* phi1 (- (* phi1 (- (+ (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* 1/12 (* phi1 (sin (neg phi2))))) (* 1/4 (cos (neg phi2))))) (* 1/2 (sin (neg phi2))))))) (* -1/2 (cos (neg phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* 1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* phi2 (- (* phi2 (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* 1/4 (cos phi1)))) (* -1/2 (sin phi1)))))) (* -1/2 (cos phi1)))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* phi2 (- (* phi2 (- (+ (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* -1/12 (* phi2 (sin phi1)))) (* 1/4 (cos phi1)))) (* -1/2 (sin phi1)))))) (* -1/2 (cos phi1)))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (* 1/2 (* (* phi1 (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))))) (* 1/2 (* (* phi1 (- (* -1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (* 1/2 (* (* phi2 (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))) (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))))))) (* 1/2 (* (* phi2 (- (* 1/12 (sin phi1)) (* -1/4 (/ (* (sin phi1) (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* 1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (* 1/2 (* (* lambda1 (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))))))) (* 1/2 (* (* lambda1 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* -1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (* 1/2 (* (* lambda2 (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))))>
#<alt (+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))))))) (* 1/2 (* (* lambda2 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))>
#<alt (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (cos (neg phi2)))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1)))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (cos phi1))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))>
#<alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))>
#<alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))>
#<alt (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))>
#<alt (+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* -1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))>
#<alt (+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* lambda1 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* -1/8 (* (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3))))))))>
#<alt (+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* lambda1 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* lambda1 (+ (* -1/8 (* (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3))))) (* -1/16 (* (* lambda1 (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 5))))))))))>
#<alt (* (sqrt (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt -1))>
#<alt (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))>
#<alt (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))>
#<alt (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow lambda1 7) (* (pow (cos phi1) 5) (* (pow (cos phi2) 5) (* (pow (cos (* -1/2 lambda2)) 5) (pow (sin (* -1/2 lambda2)) 5))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3) (pow (sqrt -1) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt -1)))>
#<alt (* -1 (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))>
#<alt (* -1 (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))))>
#<alt (* -1 (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow lambda1 7) (* (pow (cos phi1) 5) (* (pow (cos phi2) 5) (* (pow (cos (* -1/2 lambda2)) 5) (pow (sin (* -1/2 lambda2)) 5))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))>
#<alt (+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* -1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))))) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))>
#<alt (+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* 1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* phi2 (+ (* 1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* -1/2 (* (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))>
#<alt (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/4 (* (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/4 (* (* lambda1 (* (cos phi1) (cos phi2))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* 1/4 (* (* lambda1 (* (cos phi1) (cos phi2))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* -1/4 (/ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2))))))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/12 (* lambda1 (* (cos phi1) (cos phi2)))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* -1/2 (* (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2)))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))>
#<alt (* 1/4 (pow phi1 2))>
#<alt (* (pow phi1 2) (+ 1/4 (* -1/48 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ 1/4 (* (pow phi1 2) (- (* 1/1440 (pow phi1 2)) 1/48))))>
#<alt (* (pow phi1 2) (+ 1/4 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/1440 (* -1/80640 (pow phi1 2)))) 1/48))))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (- 1/2 (* 1/2 (cos phi1)))>
#<alt (sin (* 1/2 lambda2))>
#<alt (+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))>
#<alt (+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 lambda1))>
#<alt (+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))>
#<alt (+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* -1/2 lambda2))>
#<alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))>
#<alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* -1/2 (+ lambda2 (* -1 lambda1))))>
#<alt (sin (* 1/2 lambda1))>
#<alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))>
#<alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (- lambda1 lambda2)))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (sin (* 1/2 (+ lambda1 (* -1 lambda2))))>
#<alt (* -1 (sin (* 1/2 phi2)))>
#<alt (+ (* -1 (sin (* 1/2 phi2))) (* 1/2 (* phi1 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (sin (* 1/2 phi2))) (* phi1 (- (* phi1 (- (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2)))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (* -1/2 (cos (* 1/2 phi2))))))>
#<alt (+ (* -1 (sin (* 1/2 phi2))) (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/16 (cos (* 1/2 phi2))) (+ (* 1/48 (cos (* 1/2 phi2))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (- (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2)))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (sin (* 1/2 phi2)))))))) (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2))))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (* -1/2 (cos (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))>
#<alt (- (+ (* -1/2 (/ (* phi2 (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1))))) (pow (sin (* 1/2 phi1)) 2))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))>
#<alt (- (+ (* phi2 (- (* phi2 (- (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))>
#<alt (- (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/48 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* 1/16 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (sin (* 1/2 phi1)))))))) (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1))))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (- (cos (neg lambda2)) 1)>
#<alt (- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)>
#<alt (- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)>
#<alt (- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos lambda1) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (+ 1/2 (* -1/2 (cos (neg phi2))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* phi1 (sin (neg phi2))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* phi1 (+ (* 1/4 (* phi1 (cos (neg phi2)))) (* 1/2 (sin (neg phi2)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (cos (neg phi2)))))))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))>
#<alt (+ 1/2 (* -1/2 (cos phi1)))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (* -1/2 (* phi2 (sin phi1)))))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* 1/4 (* phi2 (cos phi1)))))))>
#<alt (+ 1/2 (+ (* -1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (cos phi1))))))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (- phi1 phi2))))>
#<alt (+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ 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 (* -1 (+ phi2 (* -1 phi1))))>
#<alt (cos (* -1 (+ phi2 (* -1 phi1))))>
#<alt (cos (* -1 (+ phi2 (* -1 phi1))))>
#<alt (cos (* -1 (+ 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)) 1)>
#<alt (- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)>
#<alt (- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)>
#<alt (- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)>
#<alt (- (cos lambda1) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)>
#<alt (- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (- lambda1 lambda2)) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- (cos (+ lambda1 (* -1 lambda2))) 1)>
#<alt (- 1 (cos (neg lambda2)))>
#<alt (- (+ 1 (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))>
#<alt (- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))>
#<alt (- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))>
#<alt (- 1 (cos lambda1))>
#<alt (- (+ 1 (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))>
#<alt (- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))>
#<alt (- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (- lambda1 lambda2)))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (- 1 (cos (+ lambda1 (* -1 lambda2))))>
#<alt (+ 1 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))>
#<alt (+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) 1/4))))>
#<alt (+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (+ 1/48 (* 1/24 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))))) 1/4))))>
#<alt (+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (+ 1/48 (+ (* 1/24 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* -1/720 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) 1/1440)))))) 1/4))))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (* 1/24 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* -1/8 (* lambda1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* lambda1 (+ (* -1/8 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* -1/48 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- 1 (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* lambda2 (+ (* -1/4 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1)))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (sin (* 1/2 lambda1))) (* -1/48 (sin (* 1/2 lambda1)))))))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))>
#<alt (sin (* -1/2 phi2))>
#<alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))>
#<alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* -1/2 (+ phi2 (* -1 phi1))))>
#<alt (sin (* 1/2 phi1))>
#<alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (- phi1 phi2)))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sin (* 1/2 (+ phi1 (* -1 phi2))))>
#<alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))>
#<alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>
#<alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))>

Calls

342 calls:

Time	Variable		Point	Expression
125.0ms	lambda2	@	-inf	(* (atan2 (sin (/ (- phi1 phi2) 2)) (sqrt (+ 1 (- (/ (* (* (cos phi1) (cos phi2)) (- (cos (- lambda1 lambda2)) (cos 0))) 2) (+ 1/2 (* (cos (* 1 (- phi1 phi2))) -1/2)))))) (* R 2))
25.0ms	lambda1	@	inf	(* R (* 2 (atan2 (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- (- (- 1 (* (* (* lambda1 (cos phi1)) (* (cos phi2) (cos (* lambda2 -1/2)))) (sin (* lambda2 -1/2)))) (* (pow (sin (* lambda2 -1/2)) 2) (* (cos phi2) (cos phi1)))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
19.0ms	phi1	@	inf	(* (atan2 (sqrt (+ (pow (/ (- (* (- 1/2 (* 1/2 (cos (* 2 (/ phi1 2))))) (+ 1/2 (* 1/2 (cos (* 2 (/ phi2 2)))))) (* (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2)))))) (sqrt (+ 1 (- (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) -2)))) (pow (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (sin (/ phi2 2)))) 2))))) (* R 2))
17.0ms	phi2	@	-inf	(sqrt (+ (pow (/ (- (* (- 1/2 (* 1/2 (cos (* 2 (/ phi1 2))))) (+ 1/2 (* 1/2 (cos (* 2 (/ phi2 2)))))) (* (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))))) (- (* (sin (/ phi1 2)) (cos (/ phi2 2))) (* (cos (/ phi1 2)) (- 0 (sin (/ phi2 2)))))) 2) (* (* (cos phi1) (cos phi2)) (* (sin (/ (- lambda1 lambda2) 2)) (sin (/ (- lambda1 lambda2) 2))))))
15.0ms	phi1	@	-inf	(sqrt (+ (* (* (cos phi1) (cos phi2)) (/ (- 1 (cos (- lambda1 lambda2))) 2)) (+ 1/2 (* (cos (* 1 (- phi1 phi2))) -1/2))))

rewrite322.0ms (0.6%)

Algorithm

1×	batch-egg-rewrite

Rules

3958×	`-lowering-.f32`
3958×	`-lowering-.f64`
2588×	`/-lowering-/.f32`
2588×	`/-lowering-/.f64`
1920×	`+-lowering-+.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	132	1544
1	844	883
0	8566	883

Stop Event

1×	iter limit
1×	node limit

Counts

33 → 556

Calls

Call 1

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

Outputs
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 #s(literal 2 binary64) R))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) R) #s(literal 2 binary64))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) #s(literal 2 binary64)) R)
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 phi1) (/.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (*.f64 #s(literal 2 binary64) R))
(.f64 (.f64 R (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) #s(literal 2 binary64))
(.f64 (.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) #s(literal 2 binary64)) R)
(atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))
(+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))) #s(literal 2 binary64))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) #s(literal 2 binary64)) R)
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 phi1) (/.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))) #s(literal 2 binary64))
(.f64 (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) #s(literal 2 binary64)) R)
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (/.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 phi1) (/.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (-.f64 (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(.f64 #s(literal 2 binary64) (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))))
(.f64 #s(literal 2 binary64) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))))) R))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))) R)
(.f64 (.f64 R (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))))) #s(literal 2 binary64))
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))
(exp.f64 (.f64 (log.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64)))))))))))))
(pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) lambda1) (.f64 (cos.f64 (/.f64 lambda2 #s(literal -2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))
(+.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))
(pow.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))
(.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))))
(.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))
(-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal -2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal -2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal -2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal -2 binary64)))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
(-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))))
(/.f64 (-.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal -1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(.f64 #s(literal -2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))
(.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (/.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(/.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(/.f64 (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(/.f64 (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(*.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))
(.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (exp.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(.f64 (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))))
(/.f64 (-.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))
(fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 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 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal -1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(.f64 #s(literal -2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))
(.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (.f64 #s(literal -2 binary64) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(+.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (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 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (/.f64 (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 6 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 4 binary64))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(+.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))))
(/.f64 (-.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))
(.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)))

simplify1.0s (2.1%)

Algorithm

1×	egg-herbie

Rules

6890×	`-lowering-.f32`
6890×	`-lowering-.f64`
5212×	`+-lowering-+.f64`
5212×	`+-lowering-+.f32`
1718×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	2017	70132
1	5835	68896
0	8949	68896

Stop Event

1×	iter limit
1×	node limit

Counts

1368 → 1368

Calls

Call 1

Inputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (sin (* 1/2 phi2)))) (+ (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (+ (* -1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (/ (* (cos (* 1/2 phi2)) (- (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (sin (* 1/2 phi2)))))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* -1/2 (* (/ (* phi2 (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* phi2 (+ (* -1/2 (* (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* phi2 (+ (* -1/2 (* (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 5))) (+ (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (pow (- 1/2 (* 1/2 (cos phi1))) 2) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))))) (* (pow (sin (* 1/2 phi1)) 3) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (+ (/ (* (cos (* 1/2 phi1)) (- (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (sin (* 1/2 phi1))) (/ (* (+ (* -1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (- (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* phi1 (- (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (sin (* 1/2 phi2)))) (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (+ (* -1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (/ (* (cos (* 1/2 phi2)) (- (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (sin (* 1/2 phi2)))))))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))
(+ (* -1 (/ (* phi2 (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 3))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(+ (* phi2 (- (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 5))) (+ (/ (* (cos (* 1/2 phi1)) (- (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (sin (* 1/2 phi1))) (/ (* (+ (* -1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* -1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* phi1 (+ (* -1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2)))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* phi1 (+ (* -1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/4 (/ (* (sin (neg phi2)) (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2)))))) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* -1/12 (sin (neg phi2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* 1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* phi2 (+ (* 1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* phi2 (+ (* 1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* 1/12 (sin phi1)) (* 1/4 (/ (* (sin phi1) (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* 1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda2 (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* phi1 (- (* phi1 (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* 1/4 (cos (neg phi2))))) (* 1/2 (sin (neg phi2))))))) (* -1/2 (cos (neg phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* phi1 (- (* phi1 (- (+ (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* 1/12 (* phi1 (sin (neg phi2))))) (* 1/4 (cos (neg phi2))))) (* 1/2 (sin (neg phi2))))))) (* -1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))
(- (+ 1/2 (+ (* 1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* phi2 (- (* phi2 (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* 1/4 (cos phi1)))) (* -1/2 (sin phi1)))))) (* -1/2 (cos phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* phi2 (- (* phi2 (- (+ (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* -1/12 (* phi2 (sin phi1)))) (* 1/4 (cos phi1)))) (* -1/2 (sin phi1)))))) (* -1/2 (cos phi1)))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (* 1/2 (* (* phi1 (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))))) (* 1/2 (* (* phi1 (- (* -1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (* 1/2 (* (* phi2 (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))) (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))))))) (* 1/2 (* (* phi2 (- (* 1/12 (sin phi1)) (* -1/4 (/ (* (sin phi1) (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* 1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (* 1/2 (* (* lambda1 (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))))))) (* 1/2 (* (* lambda1 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* -1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (* 1/2 (* (* lambda2 (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))))))) (* 1/2 (* (* lambda2 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2))))))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (cos (neg phi2)))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1)))))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (cos phi1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* -1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* lambda1 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* -1/8 (* (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3))))))))
(+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* lambda1 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* lambda1 (+ (* -1/8 (* (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3))))) (* -1/16 (* (* lambda1 (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 5))))))))))
(* (sqrt (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt -1))
(* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))
(* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))
(* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow lambda1 7) (* (pow (cos phi1) 5) (* (pow (cos phi2) 5) (* (pow (cos (* -1/2 lambda2)) 5) (pow (sin (* -1/2 lambda2)) 5))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3) (pow (sqrt -1) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))))
(* -1 (* (sqrt (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt -1)))
(* -1 (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))
(* -1 (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))))
(* -1 (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow lambda1 7) (* (pow (cos phi1) 5) (* (pow (cos phi2) 5) (* (pow (cos (* -1/2 lambda2)) 5) (pow (sin (* -1/2 lambda2)) 5))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* -1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))))) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* 1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* phi2 (+ (* 1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* -1/2 (* (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/4 (* (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/4 (* (* lambda1 (* (cos phi1) (cos phi2))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* 1/4 (* (* lambda1 (* (cos phi1) (cos phi2))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* -1/4 (/ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2))))))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/12 (* lambda1 (* (cos phi1) (cos phi2)))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* -1/2 (* (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2)))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(* 1/4 (pow phi1 2))
(* (pow phi1 2) (+ 1/4 (* -1/48 (pow phi1 2))))
(* (pow phi1 2) (+ 1/4 (* (pow phi1 2) (- (* 1/1440 (pow phi1 2)) 1/48))))
(* (pow phi1 2) (+ 1/4 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/1440 (* -1/80640 (pow phi1 2)))) 1/48))))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(sin (* 1/2 lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 lambda1))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(* -1 (sin (* 1/2 phi2)))
(+ (* -1 (sin (* 1/2 phi2))) (* 1/2 (* phi1 (cos (* 1/2 phi2)))))
(+ (* -1 (sin (* 1/2 phi2))) (* phi1 (- (* phi1 (- (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2)))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (* -1/2 (cos (* 1/2 phi2))))))
(+ (* -1 (sin (* 1/2 phi2))) (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/16 (cos (* 1/2 phi2))) (+ (* 1/48 (cos (* 1/2 phi2))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (- (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2)))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (sin (* 1/2 phi2)))))))) (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2))))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (* -1/2 (cos (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))
(- (+ (* -1/2 (/ (* phi2 (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1))))) (pow (sin (* 1/2 phi1)) 2))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))
(- (+ (* phi2 (- (* phi2 (- (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))
(- (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/48 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* 1/16 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (sin (* 1/2 phi1)))))))) (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1))))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(- (cos (neg lambda2)) 1)
(- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)
(- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)
(- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(- (cos lambda1) 1)
(- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)
(- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)
(- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+ 1/2 (* -1/2 (cos (neg phi2))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* phi1 (sin (neg phi2))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* phi1 (+ (* 1/4 (* phi1 (cos (neg phi2)))) (* 1/2 (sin (neg phi2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (cos (neg phi2)))))))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+ 1/2 (* -1/2 (cos phi1)))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* -1/2 (* phi2 (sin phi1)))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* 1/4 (* phi2 (cos phi1)))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (cos phi1))))))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ 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 (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ 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)) 1)
(- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)
(- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)
(- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(- (cos lambda1) 1)
(- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)
(- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)
(- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (- lambda1 lambda2)) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(- 1 (cos (neg lambda2)))
(- (+ 1 (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(- 1 (cos lambda1))
(- (+ 1 (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(+ 1 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))
(+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) 1/4))))
(+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (+ 1/48 (* 1/24 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))))) 1/4))))
(+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (+ 1/48 (+ (* 1/24 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* -1/720 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) 1/1440)))))) 1/4))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (* 1/24 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* lambda1 (+ (* -1/8 (* lambda1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* lambda1 (+ (* -1/8 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* -1/48 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(- 1 (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* lambda2 (+ (* -1/4 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1)))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (sin (* 1/2 lambda1))) (* -1/48 (sin (* 1/2 lambda1)))))))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))

Outputs
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 (+ lambda2 (* -1 lambda1)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (- lambda1 lambda2))) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda1 (* -1 lambda2)))) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* -1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))) (* phi1 (+ (* -1/2 (* (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (sin (* 1/2 phi2)))) (+ (* -1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (+ (* -1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (/ (* (cos (* 1/2 phi2)) (- (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (sin (* 1/2 phi2)))))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* 1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* -1/2 (* (/ (* phi2 (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* phi2 (+ (* -1/2 (* (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 4 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 6 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))) (* phi2 (+ (* -1/2 (* (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 5))) (+ (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (pow (- 1/2 (* 1/2 (cos phi1))) 2) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))))) (* (pow (sin (* 1/2 phi1)) 3) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (+ (/ (* (cos (* 1/2 phi1)) (- (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (sin (* 1/2 phi1))) (/ (* (+ (* -1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 4)) (* (pow (sin (* 1/2 phi1)) 6) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 4 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 6 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))))))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/6 binary64)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 4 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 6 binary64)) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))
(+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))
(+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))
(+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))
(+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(-.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* phi1 (- (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (* phi1 (- (* phi1 (- (+ (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (sin (* 1/2 phi2)))) (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (+ (* -1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (/ (* (cos (* 1/2 phi2)) (- (* -2 (- (* 1/4 (+ 1/2 (* 1/2 (cos phi2)))) (* -1/4 (pow (sin (* 1/2 phi2)) 2)))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (sin (* 1/2 phi2)))))))) (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))))) (+ (* -1 (pow (cos (* 1/2 phi2)) 2)) (+ (* -1/4 (pow (sin (* 1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 phi1 (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (* -1 (/ (* phi2 (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 3))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64))))
(+ (* phi2 (- (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2)))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64))))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2))) (pow (sin (* 1/2 phi1)) 5))) (+ (/ (* (cos (* 1/2 phi1)) (- (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (sin (* 1/2 phi1))) (/ (* (+ (* -1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* -1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (* 2 (/ (* (- 1/2 (* 1/2 (cos phi1))) (- (* -1/4 (- 1/2 (* 1/2 (cos phi1)))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (pow (sin (* 1/2 phi1)) 2))))) (+ (* -1 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))) (/ (* (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 4))))) (/ (* (cos (* 1/2 phi1)) (pow (- 1/2 (* 1/2 (cos phi1))) 2)) (pow (sin (* 1/2 phi1)) 3)))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (/ (pow (- 1/2 (* 1/2 (cos phi1))) 2) (pow (sin (* 1/2 phi1)) 2))))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (-.f64 (.f64 phi2 (-.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (-.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/6 binary64)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 5 binary64)))))) (-.f64 (.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)))))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+.f64 (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(-.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))
(+.f64 (+.f64 (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (/ (pow (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) 2) (pow (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* -1/2 (+ phi2 (* -1 phi1)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))))
(atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (+ phi1 (* -1 phi2)))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sin (* 1/2 (- phi1 phi2))) (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) (cos 0)))))) (* -1/2 (cos (- phi1 phi2))))))
(atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* -1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (.f64 (.f64 #s(literal -1/4 binary64) (neg.f64 (.f64 phi1 (sin.f64 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* phi1 (+ (* -1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* 1/2 (* (* phi1 (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2)))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (.f64 phi1 (+.f64 (.f64 (neg.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))) (* phi1 (+ (* -1/4 (* (sin (neg phi2)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/4 (/ (* (sin (neg phi2)) (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2)))))) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* -1/12 (sin (neg phi2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin (neg phi2)) 2) (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))) (* 1/4 (cos (neg phi2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (.f64 phi1 (+.f64 (.f64 (neg.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) (/.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (neg.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* 1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* phi2 (+ (* 1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* 1/2 (* (* phi2 (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))) (* phi2 (+ (* 1/4 (* (sin phi1) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* 1/12 (sin phi1)) (* 1/4 (/ (* (sin phi1) (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (+ (* 1/16 (/ (pow (sin phi1) 2) (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))) (* 1/4 (cos phi1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 phi1)) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sin.f64 phi1) (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* -1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 lambda1 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda1 (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda1 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (.f64 (+.f64 (.f64 #s(literal 1/12 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* 1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (* lambda2 (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda2 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))
(+ (sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))) (* lambda2 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))) (* 1/2 (* (- (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))))) (sqrt (/ 1 (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/12 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))) (.f64 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(sqrt (- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2)))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
(- (+ 1/2 (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (neg phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* phi1 (- (* phi1 (- (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* 1/4 (cos (neg phi2))))) (* 1/2 (sin (neg phi2))))))) (* -1/2 (cos (neg phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 phi2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* phi1 (- (* phi1 (- (+ (* -1/4 (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))) (* 1/12 (* phi1 (sin (neg phi2))))) (* 1/4 (cos (neg phi2))))) (* 1/2 (sin (neg phi2))))))) (* -1/2 (cos (neg phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/12 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi2))))) (.f64 #s(literal 1/2 binary64) (sin.f64 phi2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1)))) (* -1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (+ (* 1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos phi1)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* phi2 (- (* phi2 (- (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* 1/4 (cos phi1)))) (* -1/2 (sin phi1)))))) (* -1/2 (cos phi1)))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* phi2 (- (* phi2 (- (+ (* -1/4 (* (cos phi1) (- (cos (- lambda1 lambda2)) 1))) (* -1/12 (* phi2 (sin phi1)))) (* 1/4 (cos phi1)))) (* -1/2 (sin phi1)))))) (* -1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal -1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal -1/4 binary64) (cos.f64 phi1))))) (.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg lambda2)) 1)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)))))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (.f64 #s(literal 1/12 binary64) lambda1) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (neg (+ lambda2 (* -1 lambda1)))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos lambda1) 1)))) (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal -1/12 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(- (+ 1/2 (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))) (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(* 2 (* R (atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (- lambda1 lambda2)) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(atan2 (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))) (sqrt (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- (cos (+ lambda1 (* -1 lambda2))) 1))))))))
(atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* 1/4 (* (* phi1 (sin (neg phi2))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal 1/4 binary64) (neg.f64 (.f64 phi1 (sin.f64 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (* 1/2 (* (* phi1 (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))))
(+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 phi1 (+.f64 (.f64 (neg.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))) (* phi1 (+ (* 1/4 (* (sin (neg phi2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))) (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))))) (* 1/2 (* (* phi1 (- (* -1/12 (sin (neg phi2))) (* 1/4 (/ (* (sin (neg phi2)) (- (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2)))) (* 1/16 (/ (pow (sin (neg phi2)) 2) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))))))))))
(+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 phi1 (+.f64 (.f64 (neg.f64 (.f64 #s(literal 1/4 binary64) (sin.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 (+.f64 (neg.f64 (.f64 #s(literal -1/12 binary64) (sin.f64 phi2))) (.f64 #s(literal -1/4 binary64) (neg.f64 (.f64 (sin.f64 phi2) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi2)) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* -1/4 (* (* phi2 (sin phi1)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (* 1/2 (* (* phi2 (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))))
(+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))) (* phi2 (+ (* -1/4 (* (sin phi1) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))) (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))))))) (* 1/2 (* (* phi2 (- (* 1/12 (sin phi1)) (* -1/4 (/ (* (sin phi1) (- (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1))) (* 1/16 (/ (pow (sin phi1) 2) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))))))))))
(+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 phi2 (.f64 (-.f64 (.f64 #s(literal 1/12 binary64) (sin.f64 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sin.f64 phi1) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* 1/4 (* (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda1 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (* 1/2 (* (* lambda1 (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))) (* lambda1 (+ (* 1/4 (* (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))))))) (* 1/2 (* (* lambda1 (- (* -1/12 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* 1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 #s(literal -1/12 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))))))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* -1/4 (* (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (* 1/2 (* (* lambda2 (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))))))))
(+ (sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))) (* lambda2 (+ (* -1/4 (* (* (cos phi1) (* (cos phi2) (sin lambda1))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))))))) (* 1/2 (* (* lambda2 (- (* 1/12 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1/4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/16 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))) (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))))))))))
(+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))))) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/12 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))))))))) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))))))))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(sqrt (+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2))))))))))
(sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2)))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos (neg phi2))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi1 (+.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)) (.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (+ (* 1/2 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))) (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (cos (neg phi2)))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi1 (+.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)) (.f64 (*.f64 #s(literal -1/12 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2)))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* 1/4 (cos phi1)))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (+ (* 1/2 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (* (cos phi1) (- 1 (cos (- lambda1 lambda2))))) (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (cos phi1))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (+ phi1 (* -1 phi2)))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))) (.f64 #s(literal 1/2 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (.f64 (.f64 #s(literal -1/12 binary64) lambda1) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1)))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda2 (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (+ (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos lambda1))))) (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal 1/12 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (- lambda1 lambda2))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (- phi1 phi2))) (* 1/2 (* (cos phi1) (* (cos phi2) (- 1 (cos (+ lambda1 (* -1 lambda2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 phi1 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi1 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64))))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* 2 (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))
(atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* -1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* lambda1 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* -1/8 (* (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2))))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))))
(+ (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* lambda1 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* lambda1 (+ (* -1/8 (* (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3))))) (* -1/16 (* (* lambda1 (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))) (sqrt (/ 1 (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 5))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/16 binary64) (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 5 binary64))))))))))
(* (sqrt (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt -1))
(.f64 (sqrt.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 #s(literal -1 binary64)))
(* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))
(.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) lambda1)) (sqrt.f64 #s(literal -1 binary64)))))
(* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))
(.f64 lambda1 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) lambda1)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))))
(* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2) (pow (sqrt -1) 3)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow lambda1 7) (* (pow (cos phi1) 5) (* (pow (cos phi2) 5) (* (pow (cos (* -1/2 lambda2)) 5) (pow (sin (* -1/2 lambda2)) 5))))))) (/ (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3) (pow (sqrt -1) 5)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (/ (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt -1)))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))))
(.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))) (/.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) lambda1)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 7 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 5 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 5 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 5 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 5 binary64)))))) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))))))
(* -1 (* (sqrt (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt -1)))
(.f64 (sqrt.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda1) (+.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) lambda1)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(* -1 (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda1) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) lambda1)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
(* -1 (* lambda1 (+ (* -1/8 (* (sqrt (/ 1 (* (pow lambda1 5) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (* (pow (cos (* -1/2 lambda2)) 3) (pow (sin (* -1/2 lambda2)) 3))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (* (pow lambda1 7) (* (pow (cos phi1) 5) (* (pow (cos phi2) 5) (* (pow (cos (* -1/2 lambda2)) 5) (pow (sin (* -1/2 lambda2)) 5))))))) (* (sqrt -1) (pow (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow lambda1 3) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (sqrt -1) (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* (sqrt (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) lambda1)) (sqrt -1)))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda1) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) lambda1)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 7 binary64))) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 5 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 5 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 5 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 5 binary64)))))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* -1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 phi1 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))) (* phi1 (+ (* -1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* phi1 (+ (* -1/2 (* (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))))) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))) (* -1/2 (* (+ (* -1/2 (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 phi1 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))
(sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* 1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))))) (* phi2 (+ (* 1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* phi2 (+ (* -1/2 (* (* phi2 (+ (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))))) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))) (* -1/2 (* (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (- 1 (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))))
(+.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))))) (.f64 phi2 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))) (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))))))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/4 (* (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda1 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/4 (* (* lambda1 (* (cos phi1) (cos phi2))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 lambda1 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (cos.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(+ (sqrt (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* 1/4 (* (* lambda1 (* (cos phi1) (cos phi2))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* -1/2 (* (* lambda2 (+ (* -1/4 (/ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2))))))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/12 (* lambda1 (* (cos phi1) (cos phi2)))))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* -1/2 (* (+ (* 1/16 (/ (* (pow lambda1 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (* 1/4 (* (cos phi1) (cos phi2)))) (sqrt (/ 1 (- 1 (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (cos.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 lambda1 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/12 binary64) lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 lambda1 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (cos.f64 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt (- 1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* 1/4 (pow phi1 2))
(.f64 #s(literal 1/4 binary64) (.f64 phi1 phi1))
(* (pow phi1 2) (+ 1/4 (* -1/48 (pow phi1 2))))
(.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal -1/48 binary64) (.f64 phi1 phi1))))
(* (pow phi1 2) (+ 1/4 (* (pow phi1 2) (- (* 1/1440 (pow phi1 2)) 1/48))))
(.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal 1/1440 binary64) (.f64 phi1 phi1)) #s(literal -1/48 binary64)))))
(* (pow phi1 2) (+ 1/4 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/1440 (* -1/80640 (pow phi1 2)))) 1/48))))
(.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/1440 binary64) (.f64 #s(literal -1/80640 binary64) (.f64 phi1 phi1)))) #s(literal -1/48 binary64)))))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(sin (* 1/2 lambda2))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(+ (sin (* 1/2 lambda2)) (* -1/2 (* lambda1 (cos (* 1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* -1/8 (* lambda1 (sin (* 1/2 lambda2)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (sin (* 1/2 lambda2)) (* lambda1 (+ (* -1/2 (cos (* 1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* 1/2 lambda2))) (* 1/48 (* lambda1 (cos (* 1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (.f64 #s(literal 1/48 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 lambda1))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda1))
(+ (sin (* -1/2 lambda1)) (* 1/2 (* lambda2 (cos (* -1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* -1/8 (* lambda2 (sin (* -1/2 lambda1)))) (* 1/2 (cos (* -1/2 lambda1))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda1))))))
(+ (sin (* -1/2 lambda1)) (* lambda2 (+ (* 1/2 (cos (* -1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* -1/2 lambda1))) (* -1/48 (* lambda2 (cos (* -1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1))) (.f64 (.f64 #s(literal -1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda1))))))))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 (.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (.f64 (.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(* -1 (sin (* 1/2 phi2)))
(-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (sin (* 1/2 phi2))) (* 1/2 (* phi1 (cos (* 1/2 phi2)))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (sin (* 1/2 phi2))) (* phi1 (- (* phi1 (- (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2)))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (* -1/2 (cos (* 1/2 phi2))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (sin (* 1/2 phi2))) (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/16 (cos (* 1/2 phi2))) (+ (* 1/48 (cos (* 1/2 phi2))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (- (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2)))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (sin (* 1/2 phi2)))))))) (* 1/4 (/ (+ 1/2 (* 1/2 (cos phi2))) (sin (* 1/2 phi2))))) (+ (* -1/4 (sin (* 1/2 phi2))) (+ (* 1/8 (sin (* 1/2 phi2))) (* 1/4 (/ (pow (cos (* 1/2 phi2)) 2) (sin (* 1/2 phi2)))))))) (* -1/2 (cos (* 1/2 phi2))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/48 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) #s(literal 1/4 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))
(/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(- (+ (* -1/2 (/ (* phi2 (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1))))) (pow (sin (* 1/2 phi1)) 2))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(- (+ (* phi2 (- (* phi2 (- (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))
(+.f64 (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (/.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))) (+.f64 (/.f64 (+.f64 #s(literal -1/16 binary64) (.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(- (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/48 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))) (+ (* 1/16 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (sin (* 1/2 phi1)))))))) (* -1/4 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1))))) (+ (* -1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 3))) (+ (* -1/8 (/ (- 1/2 (* 1/2 (cos phi1))) (sin (* 1/2 phi1)))) (* 1/4 (/ (pow (cos (* 1/2 phi1)) 2) (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* (cos (* 1/2 phi1)) (- 1/2 (* 1/2 (cos phi1)))) (pow (sin (* 1/2 phi1)) 2))))) (* 1/2 (/ 1 (sin (* 1/2 phi1))))) (* 1/2 (/ (cos phi1) (sin (* 1/2 phi1)))))
(+.f64 (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (-.f64 (/.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/48 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/4 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))) (+.f64 (/.f64 (+.f64 #s(literal -1/16 binary64) (.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))) (+.f64 (/.f64 (+.f64 #s(literal -1/16 binary64) (.f64 #s(literal -1/8 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(/ (- (* (+ 1/2 (* 1/2 (cos phi2))) (- 1/2 (* 1/2 (cos phi1)))) (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi2)) 2))) (- (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(- (cos (neg lambda2)) 1)
(+.f64 (cos.f64 lambda2) #s(literal -1 binary64))
(- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)
(+.f64 (cos.f64 lambda2) (+.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))
(- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)
(+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))
(- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)
(+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (sin.f64 lambda2)))) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (neg (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos lambda1) 1)
(+.f64 (cos.f64 lambda1) #s(literal -1 binary64))
(- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))
(- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))
(- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (sin.f64 lambda1))) #s(literal -1 binary64)))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(+ 1/2 (* -1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* 1/2 (* phi1 (sin (neg phi2))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (*.f64 #s(literal 1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* phi1 (+ (* 1/4 (* phi1 (cos (neg phi2)))) (* 1/2 (sin (neg phi2)))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 phi1 (+.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi2))) (.f64 #s(literal 1/4 binary64) (*.f64 phi1 (cos.f64 phi2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg phi2))) (* phi1 (+ (* 1/2 (sin (neg phi2))) (* phi1 (+ (* -1/12 (* phi1 (sin (neg phi2)))) (* 1/4 (cos (neg phi2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 phi1 (+.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi2)) (.f64 (*.f64 #s(literal -1/12 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2))))))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ 1/2 (* -1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ 1/2 (* -1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* -1/2 (* phi2 (sin phi1)))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* 1/4 (* phi2 (cos phi1)))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 #s(literal 1/4 binary64) (*.f64 phi2 (cos.f64 phi1))))))
(+ 1/2 (+ (* -1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* 1/12 (* phi2 (sin phi1))) (* 1/4 (cos phi1))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)) (.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1))))))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* -1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2))) (sin.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 (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (*.f64 #s(literal 1/6 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2))))) (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 (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (* -1 (+ 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 (.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))))) (* -1 (sin phi1)))))
(+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1))))) (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 lambda2)) 1)
(+.f64 (cos.f64 lambda2) #s(literal -1 binary64))
(- (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) 1)
(+.f64 (cos.f64 lambda2) (+.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))
(- (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) 1)
(+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))
(- (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) 1)
(+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (sin.f64 lambda2)))) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (* -1 (+ lambda2 (* -1 lambda1)))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos lambda1) 1)
(+.f64 (cos.f64 lambda1) #s(literal -1 binary64))
(- (+ (cos lambda1) (* lambda2 (sin lambda1))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))
(- (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))
(- (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) 1)
(+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (sin.f64 lambda1))) #s(literal -1 binary64)))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (- lambda1 lambda2)) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- (cos (+ lambda1 (* -1 lambda2))) 1)
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(- 1 (cos (neg lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 lambda2))
(- (+ 1 (* lambda1 (sin (neg lambda2)))) (cos (neg lambda2)))
(+.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) (cos.f64 lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* 1/2 (* lambda1 (cos (neg lambda2))))))) (cos (neg lambda2)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))
(- (+ 1 (* lambda1 (+ (sin (neg lambda2)) (* lambda1 (- (* -1/6 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))))))) (cos (neg lambda2)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))) (sin.f64 lambda2))) (cos.f64 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (neg (+ lambda2 (* -1 lambda1)))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos lambda1))
(-.f64 #s(literal 1 binary64) (cos.f64 lambda1))
(- (+ 1 (* -1 (* lambda2 (sin lambda1)))) (cos lambda1))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1)))))) (cos lambda1))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) (cos.f64 lambda1)))
(- (+ 1 (* lambda2 (+ (* -1 (sin lambda1)) (* lambda2 (- (* 1/6 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))))))) (cos lambda1))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (-.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))) (sin.f64 lambda1))) (cos.f64 lambda1)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (- lambda1 lambda2)))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1 (cos (+ lambda1 (* -1 lambda2))))
(-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+ 1 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) 1/4))))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1/4 binary64))))
(+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (+ 1/48 (* 1/24 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))))) 1/4))))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/48 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) #s(literal -1/4 binary64)))))
(+ 1 (+ (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi1 2) (- (+ (* -1/2 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (+ 1/48 (+ (* 1/24 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi1 2) (- (* -1/720 (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) 1/1440)))))) 1/4))))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 (+.f64 #s(literal 1/48 binary64) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1/1440 binary64))))) #s(literal -1/4 binary64)))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))))))) (pow (sin (* 1/2 phi1)) 2))
(-.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(- (+ 1 (+ (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (* 1/24 (* (cos phi1) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2)))))))))))) (pow (sin (* 1/2 phi1)) 2))
(-.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* -1/8 (* lambda1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* lambda1 (+ (* -1/8 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (* -1/48 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))))))) (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 #s(literal -1/48 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- 1 (pow (sin (* 1/2 phi1)) 2))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(- (+ 1 (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))))) (pow (sin (* 1/2 phi1)) 2))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(- (+ 1 (* lambda2 (+ (* -1/4 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1)))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (* 1/2 lambda1))))) (* lambda2 (+ (* -1/4 (* (cos phi1) (* (cos phi2) (cos (* 1/2 lambda1))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/16 (sin (* 1/2 lambda1))) (* -1/48 (sin (* 1/2 lambda1)))))))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal -1/12 binary64)))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (- lambda1 lambda2))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* (cos phi1) (* (cos phi2) (* (sin (* 1/2 lambda2)) (sin (* 1/2 (+ lambda1 (* -1 lambda2)))))))) (pow (sin (* 1/2 phi1)) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 phi1 (.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda2 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))

eval495.0ms (1%)

Compiler: Compiled 195580 to 7040 computations (96.4% saved)

prune1.5s (3%)

Pruning

211 alts after pruning (211 fresh and 0 done)

	Pruned	Kept	Total
New	2281	87	2368
Fresh	39	124	163
Picked	5	0	5
Done	0	0	0
Total	2325	211	2536

Accuracy

79.2%

Counts

2536 → 211

Alt Table

Click to see full alt table

Status	Accuracy	Program
	17.7%	(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	17.7%	(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	14.2%	(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.1%	(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.1%	(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.6%	(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	15.5%	(.f64 (atan2.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	17.7%	(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	40.4%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	33.2%	(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.9%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	13.2%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	13.4%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	14.4%	(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	15.8%	(.f64 (atan2.f64 (.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	58.0%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.3%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	29.1%	(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	42.6%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.3%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	34.8%	(.f64 (atan2.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	42.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	48.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	51.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	75.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	49.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	58.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	58.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	60.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	49.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	45.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	52.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	33.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	75.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	75.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	75.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	75.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	62.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	43.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	60.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	37.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	39.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	55.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	33.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	38.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	37.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	30.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 R #s(literal 2 binary64)))
	48.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	48.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	48.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	40.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	29.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	35.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	35.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	47.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	35.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	61.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	61.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	38.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	47.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	28.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (*.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	27.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	44.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	37.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	25.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	34.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	28.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	34.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	45.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	24.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	31.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	34.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	34.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	57.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	34.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	41.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	39.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	56.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	37.5%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	58.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	34.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	45.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	57.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	51.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	58.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	39.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	57.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	41.7%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	38.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
	41.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	42.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	44.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	34.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	38.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	28.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	35.4%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	47.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	46.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
	46.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	26.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	48.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	36.6%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	44.3%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	31.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	42.8%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	43.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	44.1%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	42.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	43.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	44.0%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
	40.9%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	40.2%	(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
	11.4%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	6.7%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	8.6%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.0%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
	11.6%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
	11.2%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	15.4%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
	16.7%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
	17.1%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	9.7%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	11.6%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	9.0%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	14.3%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	13.4%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	14.3%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
	12.9%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	14.0%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	12.4%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	13.6%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	14.3%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
	13.6%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
	11.9%	(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	14.3%	(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	12.9%	(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	12.3%	(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.0%	(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	11.2%	(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	16.4%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	17.1%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
	13.4%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	16.5%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
	11.2%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	12.3%	(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	14.2%	(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
	40.8%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	39.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	38.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	43.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	39.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	39.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
	61.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
	36.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))))))
	36.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 6 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))))
	42.6%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	27.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	35.5%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
	31.2%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
	47.9%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
	49.0%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
	8.1%	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))

Compiler

Compiled 42099 to 11439 computations (72.8% saved)

regimes1.9s (3.8%)

Counts

335 → 1

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (.f64 phi1 (-.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda1 #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 phi1) lambda1))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 4 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 6 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64))))) (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 6 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (+.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1/4 binary64) (+.f64 (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 6 binary64))))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))

Outputs

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

Calls

12 calls:

156.0ms	(-.f64 lambda1 lambda2)
152.0ms	lambda2
145.0ms	phi1
141.0ms	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
137.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
76.5%	1	`R`
76.5%	1	`lambda1`
76.5%	1	`lambda2`
76.5%	1	`phi1`
76.5%	1	`phi2`
76.5%	1	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
76.5%	1	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
76.5%	1	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
76.5%	1	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`
76.5%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
76.5%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
76.5%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 296 to 142 computations (52% saved)

regimes1.7s (3.4%)

Counts

292 → 1

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))

Outputs

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

Calls

12 calls:

127.0ms	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
127.0ms	phi1
119.0ms	lambda2
118.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
114.0ms	lambda1

Results

Accuracy	Segments	Branch
76.5%	1	`phi2`
76.5%	1	`phi1`
76.5%	1	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
76.5%	1	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
76.5%	1	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`
76.5%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
76.5%	1	`(-.f64 lambda1 lambda2)`
76.5%	1	`R`
76.5%	1	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
76.5%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
76.5%	1	`lambda2`
76.5%	1	`lambda1`

Compiler

Compiled 296 to 142 computations (52% saved)

regimes2.0s (4.1%)

Counts

285 → 3

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))

Outputs

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

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

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

Calls

12 calls:

133.0ms	lambda2
132.0ms	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
131.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
127.0ms	lambda1
121.0ms	phi2

Results

Accuracy	Segments	Branch
70.5%	3	`phi1`
70.1%	3	`phi2`
62.2%	1	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
62.2%	1	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
62.2%	1	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`
67.6%	3	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
67.6%	3	`(-.f64 lambda1 lambda2)`
62.2%	1	`R`
76.3%	3	`lambda2`
63.8%	2	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
68.2%	3	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
75.0%	3	`lambda1`

Compiler

Compiled 296 to 142 computations (52% saved)

regimes694.0ms (1.4%)

Counts

283 → 3

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))

Outputs

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

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

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

Calls

2 calls:

111.0ms	lambda2
100.0ms	lambda1

Results

Accuracy	Segments	Branch
67.1%	3	`lambda1`
72.1%	3	`lambda2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes1.6s (3.1%)

Counts

282 → 1

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) phi2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (.f64 (neg.f64 phi1) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (neg.f64 (.f64 phi1 (sin.f64 phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) (.f64 (cos.f64 phi2) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/4 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (-.f64 #s(literal 1 binary64) (.f64 lambda2 (sin.f64 lambda1))) (cos.f64 lambda1))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 #s(literal -1/2 binary64))))))))) (.f64 #s(literal 2 binary64) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda2 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 lambda2 #s(literal -2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi2 (cos.f64 phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 phi1 (cos.f64 phi2))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/12 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/4 binary64) (cos.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 phi1 phi2) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (+.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 1 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi2 (sin.f64 phi1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) #s(literal 3/2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 #s(literal -1/8 binary64) lambda1)) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) lambda1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64))))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (+.f64 #s(literal 3/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/8 binary64) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 lambda1 #s(literal -1/48 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 phi1 (cos.f64 (.f64 phi2 #s(literal -1/2 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 lambda1 #s(literal 2 binary64))) (cos.f64 (/.f64 lambda2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 lambda1 #s(literal 2 binary64))) (sin.f64 (/.f64 lambda2 #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1)))) (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (-.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 1 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)))) (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (.f64 phi1 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 1 binary64)))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.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 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (.f64 (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 (pow.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 1 binary64))) #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))

Outputs

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

Calls

11 calls:

128.0ms	(-.f64 lambda1 lambda2)
125.0ms	phi1
120.0ms	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
117.0ms	lambda2
112.0ms	(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))

Results

Accuracy	Segments	Branch
62.2%	1	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
62.2%	1	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
62.2%	1	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`
62.2%	1	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.2%	1	`lambda1`
62.2%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
62.2%	1	`(-.f64 lambda1 lambda2)`
62.2%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
62.2%	1	`phi2`
62.2%	1	`phi1`
62.2%	1	`lambda2`

Compiler

Compiled 290 to 137 computations (52.8% saved)

regimes1.4s (2.8%)

Counts

237 → 2

Calls

Call 1

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

Outputs

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

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

Calls

12 calls:

124.0ms	phi1
108.0ms	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
106.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
101.0ms	lambda1
101.0ms	lambda2

Results

Accuracy	Segments	Branch
61.0%	1	`phi1`
61.0%	1	`lambda1`
61.0%	1	`phi2`
61.0%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
61.0%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	1	`(-.f64 lambda1 lambda2)`
61.0%	1	`R`
61.0%	1	(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
61.0%	1	`lambda2`
61.0%	1	(.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
61.0%	1	(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
62.6%	2	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`

Compiler

Compiled 296 to 142 computations (52% saved)

regimes394.0ms (0.8%)

Counts

229 → 1

Calls

Call 1

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

Outputs

(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))

Calls

2 calls:

84.0ms

75.0ms

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

Results

Accuracy	Segments	Branch
61.0%	1	`R`
61.0%	1	`(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))`

Compiler

Compiled 39 to 24 computations (38.5% saved)

regimes637.0ms (1.3%)

Counts

174 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

80.0ms	lambda2
78.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
59.0ms	lambda1
57.0ms	phi1
56.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
61.0%	1	`lambda1`
61.0%	1	`phi1`
61.0%	1	`phi2`
61.0%	1	`lambda2`
61.0%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	1	`(-.f64 lambda1 lambda2)`
61.0%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
61.0%	1	`R`

Compiler

Compiled 59 to 48 computations (18.6% saved)

regimes528.0ms (1%)

Counts

124 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

60.0ms	phi1
51.0ms	(-.f64 lambda1 lambda2)
49.0ms	phi2
47.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
46.0ms	lambda1

Results

Accuracy	Segments	Branch
61.0%	1	`lambda1`
61.0%	1	`phi1`
61.0%	1	`phi2`
61.0%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	1	`(-.f64 lambda1 lambda2)`
61.0%	1	`lambda2`
61.0%	1	`R`
61.0%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`

Compiler

Compiled 59 to 48 computations (18.6% saved)

regimes455.0ms (0.9%)

Counts

119 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

67.0ms	lambda2
47.0ms	phi1
46.0ms	R
44.0ms	lambda1
35.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
61.0%	1	`lambda1`
61.0%	1	`phi1`
61.0%	1	`phi2`
61.0%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	1	`(-.f64 lambda1 lambda2)`
61.0%	1	`lambda2`
61.0%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
61.0%	1	`R`

Compiler

Compiled 59 to 48 computations (18.6% saved)

regimes486.0ms (1%)

Counts

117 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

75.0ms	lambda1
53.0ms	R
50.0ms	lambda2
47.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
42.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
58.8%	1	`lambda1`
58.8%	1	`phi1`
58.8%	1	`phi2`
58.8%	1	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
58.8%	1	`(-.f64 lambda1 lambda2)`
58.8%	1	`lambda2`
58.8%	1	`R`
58.8%	1	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`

Compiler

Compiled 59 to 48 computations (18.6% saved)

regimes349.0ms (0.7%)

Counts

94 → 3

Calls

Call 1

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

Outputs

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

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

(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))

Calls

8 calls:

53.0ms	phi2
43.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
37.0ms	(-.f64 lambda1 lambda2)
28.0ms	lambda2
26.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
57.5%	1	`phi1`
57.5%	1	`phi2`
57.5%	1	`R`
57.5%	1	`lambda1`
57.5%	1	`lambda2`
61.0%	3	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	3	`(-.f64 lambda1 lambda2)`
61.0%	3	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`

Compiler

Compiled 59 to 48 computations (18.6% saved)

regimes139.0ms (0.3%)

Counts

92 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

43.0ms	(-.f64 lambda1 lambda2)
29.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
61.0%	3	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	3	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 18 to 14 computations (22.2% saved)

regimes106.0ms (0.2%)

Counts

66 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

19.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
18.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
61.0%	3	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
61.0%	3	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 18 to 14 computations (22.2% saved)

regimes641.0ms (1.3%)

Counts

65 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

8 calls:

420.0ms	lambda1
50.0ms	phi1
35.0ms	(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
25.0ms	(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
17.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
57.9%	3	`phi1`
57.9%	3	`phi2`
44.1%	1	`R`
47.7%	3	`lambda1`
47.4%	2	`lambda2`
53.9%	3	`(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))`
54.6%	3	`(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))`
54.6%	3	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 59 to 48 computations (18.6% saved)

regimes150.0ms (0.3%)

Counts

54 → 1

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))

Outputs

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

Calls

5 calls:

26.0ms	phi1
20.0ms	lambda2
16.0ms	(-.f64 lambda1 lambda2)
15.0ms	phi2
15.0ms	lambda1

Results

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

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes153.0ms (0.3%)

Counts

53 → 1

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) #s(literal 1/2 binary64)))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (sin.f64 lambda1)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 lambda1 lambda2)))))) (-.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 lambda1 #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (sin.f64 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal 1/2 binary64)) phi2) #s(literal -1/2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (sin.f64 lambda1))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (+.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (exp.f64 (.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (exp.f64 (.f64 (log.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (+.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (+.f64 (sin.f64 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (cos.f64 (.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))

Outputs

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

Calls

6 calls:

33.0ms	phi2
31.0ms	lambda2
16.0ms	(-.f64 lambda1 lambda2)
16.0ms	lambda1
15.0ms	R

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes124.0ms (0.2%)

Counts

45 → 1

Calls

Call 1

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

Outputs

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

Calls

6 calls:

42.0ms	lambda1
20.0ms	lambda2
12.0ms	R
12.0ms	phi1
12.0ms	(-.f64 lambda1 lambda2)

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes62.0ms (0.1%)

Counts

21 → 1

Calls

Call 1

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

Outputs

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

Calls

6 calls:

19.0ms	R
15.0ms	phi1
6.0ms	phi2
6.0ms	(-.f64 lambda1 lambda2)
6.0ms	lambda1

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes19.0ms (0%)

Counts

5 → 1

Calls

Call 1

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

Outputs

(*.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (*.f64 R #s(literal 2 binary64)))

Calls

6 calls:

5.0ms	lambda1
2.0ms	R
2.0ms	(-.f64 lambda1 lambda2)
2.0ms	phi2
2.0ms	lambda2

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes14.0ms (0%)

Counts

2 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

6 calls:

5.0ms	lambda2
2.0ms	(-.f64 lambda1 lambda2)
2.0ms	phi1
2.0ms	R
2.0ms	phi2

Results

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

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

Outputs

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

Calls

6 calls:

1.0ms	lambda2
1.0ms	lambda1
1.0ms	(-.f64 lambda1 lambda2)
1.0ms	phi2
1.0ms	R

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

bsearch272.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
148.0ms	1.2535747486360734e-10	41.77463813354049
88.0ms	-8.4601548670877e-21	-2.783272559163383e-22

Results

185.0ms	231×	1	valid
8.0ms	41×	0	valid

Compiler

Compiled 3138 to 1818 computations (42.1% saved)

Precisions

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

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

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

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

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

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

ival-sqrt: 7.0ms (4.5% of total)

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

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

ival-atan2: 6.0ms (3.9% of total)

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

const: 1.0ms (0.6% of total)

bsearch170.0ms (0.3%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
52.0ms	41.77463813354049	56.876148769223846
96.0ms	-8.4601548670877e-21	-2.783272559163383e-22

Results

134.0ms	132×	1	valid
6.0ms	28×	0	valid

Compiler

Compiled 1766 to 1011 computations (42.8% saved)

Precisions

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

ival-sin: 45.0ms (38.2% of total)

ival-atan2: 19.0ms (16.1% of total)

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch8.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0007987788134928464	0.0011485720223175899

Compiler

Compiled 51 to 34 computations (33.3% saved)

bsearch2.0ms (0%)

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	8.4601548670877e-21	1.9782269037932645e-14
0.0ms	-56.876148769223846	-41.77463813354049

Compiler

Compiled 72 to 33 computations (54.2% saved)

bsearch2.0ms (0%)

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	8.4601548670877e-21	1.9782269037932645e-14
0.0ms	-56.876148769223846	-41.77463813354049

Compiler

Compiled 72 to 33 computations (54.2% saved)

bsearch1.0ms (0%)

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	8.4601548670877e-21	1.9782269037932645e-14
0.0ms	-56.876148769223846	-41.77463813354049

Compiler

Compiled 72 to 33 computations (54.2% saved)

bsearch268.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
132.0ms	2.533143973976028e-19	4127.132060609935
118.0ms	-1178433503.9845376	-2519.896090012551

Results

206.0ms	277×	1	valid
15.0ms	43×	0	valid

Compiler

Compiled 2478 to 1513 computations (38.9% saved)

Precisions

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

ival-sin: 48.0ms (24.7% of total)

ival-cos: 34.0ms (17.5% of total)

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

backward-pass: 21.0ms (10.8% of total)

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

ival-div: 15.0ms (7.7% of total)

const: 12.0ms (6.2% of total)

ival-sqrt: 8.0ms (4.1% of total)

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

ival-atan2: 7.0ms (3.6% of total)

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

bsearch175.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
168.0ms	-5.959356276090811e+37	-1.6983342515494165e+21

Results

145.0ms	159×	1	valid
0.0ms	1×	0	valid

Compiler

Compiled 798 to 523 computations (34.5% saved)

Precisions

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

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

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

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

backward-pass: 11.0ms (10.2% of total)

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

ival-sqrt: 5.0ms (4.7% of total)

ival-pow: 4.0ms (3.7% of total)

ival-div: 4.0ms (3.7% of total)

ival-atan2: 4.0ms (3.7% of total)

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

const: 1.0ms (0.9% of total)

simplify68.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

294×	`*-commutative_binary64`
246×	`+-commutative_binary64`
162×	`sub-neg_binary64`
130×	`neg-mul-1_binary64`
126×	`neg-sub0_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	331	1998
1	567	1998
2	689	1998
3	822	1998
4	910	1998
5	966	1998
6	1014	1998
7	1061	1998
8	1099	1998
9	1113	1998
10	1118	1998
11	1119	1998

Stop Event

1×

saturated

Calls

Call 1

Inputs
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(if (<=.f64 lambda2 #s(literal -5449834782718155/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 lambda2 #s(literal 1983393922805251/2361183241434822606848 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))))
(if (<=.f64 lambda2 #s(literal -5449834782718155/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 lambda2 #s(literal 42 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1152921504606847/1152921504606846976 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))))
(if (<=.f64 phi2 #s(literal -2550 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 phi2 #s(literal 4722366482869645/9444732965739290427392 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(if (<=.f64 phi1 #s(literal -5800000000000000039436163143757201408 binary64)) (.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (.f64 R #s(literal 2 binary64))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))

Outputs
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
(if (<=.f64 lambda2 #s(literal -5449834782718155/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 lambda2 #s(literal 1983393922805251/2361183241434822606848 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))))
(if (<=.f64 lambda2 #s(literal -5449834782718155/664613997892457936451903530140172288 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (if (<=.f64 lambda2 #s(literal 1983393922805251/2361183241434822606848 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
(if (<=.f64 lambda2 #s(literal -5449834782718155/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 lambda2 #s(literal 42 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 lambda2 #s(literal -5449834782718155/664613997892457936451903530140172288 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 (.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (.f64 lambda2 #s(literal 1/2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))) (if (<=.f64 lambda2 #s(literal 42 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (.f64 lambda1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1152921504606847/1152921504606846976 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 R #s(literal 2 binary64))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #s(literal 1152921504606847/1152921504606846976 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (pow.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))) (pow.f64 (-.f64 (.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #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 phi1 phi2) #s(literal 2 binary64))))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))))))
(.f64 R (.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))) (*.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 phi1 phi2))))))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))))))) (.f64 R #s(literal 2 binary64)))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda2 lambda1))))))))))))
(if (<=.f64 phi2 #s(literal -2550 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (if (<=.f64 phi2 #s(literal 4722366482869645/9444732965739290427392 binary64)) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))))
(if (<=.f64 phi2 #s(literal -2550 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (if (<=.f64 phi2 #s(literal 4722366482869645/9444732965739290427392 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))))
(.f64 (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal -1 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))) #s(literal -1/2 binary64))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal -1 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))))
(.f64 (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) lambda2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (.f64 (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))) (.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) #s(literal -1 binary64))))))))))
(if (<=.f64 phi1 #s(literal -5800000000000000039436163143757201408 binary64)) (.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (.f64 R #s(literal 2 binary64))) (.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (.f64 R #s(literal 2 binary64))))
(if (<=.f64 phi1 #s(literal -5800000000000000039436163143757201408 binary64)) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))))))))
(.f64 (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 R #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) R) (atan2.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (+.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))

soundness5.9s (11.8%)

Rules

7464×	`-lowering-.f32`
7464×	`-lowering-.f64`
6890×	`-lowering-.f32`
6890×	`-lowering-.f64`
6306×	`-lowering-.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	41	416
1	223	398
2	1936	388
0	11141	388
0	106	1127
1	671	866
2	7325	866
0	8141	866
0	707	25470
1	2441	24860
0	8956	24860
0	2017	70132
1	5835	68896
0	8949	68896
0	108	1149
1	635	895
2	6248	895
0	8057	895
0	26	65
1	55	63
2	117	63
3	290	63
4	704	63
5	1433	63
6	3421	63
7	5443	63
8	6960	63
0	8086	63
0	1974	72351
1	6633	71693
0	8057	71693
0	132	1544
1	844	883
0	8566	883
0	2054	75455
1	5958	73305
0	8021	73305

Stop Event

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

Compiler

Compiled 4719 to 1693 computations (64.1% saved)

preprocess305.0ms (0.6%)

Remove: (negabs R)
Compiler: Compiled 7428 to 1916 computations (74.2% saved)

analyze1.4s (2.9%)

sample7.3s (14.5%)

preprocess238.0ms (0.5%)

explain628.0ms (1.2%)

eval1.0ms (0%)

prune6.0ms (0%)

simplify172.0ms (0.3%)

localize576.0ms (1.1%)

series170.0ms (0.3%)

rewrite592.0ms (1.2%)

simplify641.0ms (1.3%)

eval263.0ms (0.5%)

prune316.0ms (0.6%)

simplify327.0ms (0.6%)

localize1.6s (3.2%)

series511.0ms (1%)

rewrite337.0ms (0.7%)

simplify1.1s (2.2%)

eval669.0ms (1.3%)

prune658.0ms (1.3%)

simplify264.0ms (0.5%)

localize1.8s (3.5%)

series395.0ms (0.8%)

rewrite506.0ms (1%)

simplify1.1s (2.2%)

eval919.0ms (1.8%)

prune1.2s (2.3%)

simplify246.0ms (0.5%)

localize1.8s (3.5%)

series497.0ms (1%)

rewrite322.0ms (0.6%)

simplify1.0s (2.1%)

eval495.0ms (1%)

prune1.5s (3%)

regimes1.9s (3.8%)

regimes1.7s (3.4%)

regimes2.0s (4.1%)

regimes694.0ms (1.4%)

regimes1.6s (3.1%)

regimes1.4s (2.8%)

regimes394.0ms (0.8%)

regimes637.0ms (1.3%)

regimes528.0ms (1%)

regimes455.0ms (0.9%)

regimes486.0ms (1%)

regimes349.0ms (0.7%)

regimes139.0ms (0.3%)

regimes106.0ms (0.2%)

regimes641.0ms (1.3%)

regimes150.0ms (0.3%)

regimes153.0ms (0.3%)

regimes124.0ms (0.2%)

regimes62.0ms (0.1%)

regimes19.0ms (0%)

regimes14.0ms (0%)

regimes8.0ms (0%)

bsearch272.0ms (0.5%)

bsearch170.0ms (0.3%)

bsearch8.0ms (0%)

bsearch2.0ms (0%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch268.0ms (0.5%)

bsearch175.0ms (0.3%)

simplify68.0ms (0.1%)

soundness5.9s (11.8%)

preprocess305.0ms (0.6%)

end0.0ms (0%)

Profiling